Scatter plot: dymanic colors based om R2 (correl function)

[schibler]

Hi all,

i got a little problem.

I'm working on a trellis chart with 6 scatterplots. On the Y-axe i have the main score (uniTEST_resultat), while on the X-axes have 5 sub-scores: Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt (the 6. scatterplot is just uniTEST_resultat on X and Y axes).

The scatterplots  are working fine.

But now i got the idea, that i want the dots' colors to be based upon their r2 (correl.) score. e.g.

if r2 for one person is 0.25, I want a almost red dot, while for a person with a r2 = 0.75 i want a blue dot.

I hope that you can help me

thanks,

agner

The scatterplots are builded as following:

dimension1 (for the trellis) is based on a ValueList:

ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')

dimension2 is just a uniq_id for the respondents

Expression1 (x-axe) is created by:

if (ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')
='uniTEST',
Sum ({< type_stat={'3'}, uniTEST_resultat -={''}, year={‘1’} >}uniTEST_resultat),
if (ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')
='Kvantitativt',
Sum ({< type_stat={'3'}, Kvantitativt_ræsonnement -={''}, year={‘1’} >}Kvantitativt_ræsonnement),
if (ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')
='Kristisk',
Sum ({< type_stat={'3'}, Kritisk_ræsonnement -={''}, year={‘1’} >}Kritisk_ræsonnement),
if (ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')
='Videnskabeligt',
Sum ({< type_stat={'3'}, Videnskabeligt_ræsonnement -={''}, year={‘1’} >}Videnskabeligt_ræsonnement),
if (ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')
='Sprogligt',
Sum ({< type_stat={'3'}, Sprogligt_ræsonnement -={''}, year={‘1’} >}Sprogligt_ræsonnement),
if (ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt')
='Interprsonelt',
Sum ({< type_stat={'3'}, Interpersonelt_ræsonnement -={''}, year={‘1’} >}Interpersonelt_ræsonnement),

))))))

The ScP works, with a  easy colorexpression like "if( optaget_1okt ='1' , $(vBackground1), $(vTertiaryData1))", without a problem, but fails with this colorexpression

If(ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt') ='uniTEST',
(if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat) =< 0.15, $(vBackground1)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat) > 0.15 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat)<0.30, $(vTertiaryData4)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat)>=0.30 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat)<0.45, $(vTertiaryData3)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat)>=0.45 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat) <0.60, $(vTertiaryData2)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} uniTEST_resultat, uniTEST_resultat)>=0.60, $(vTertiaryData1))),

/*have tried just the first part --> stil fails*/

If(ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt') ='Kvantitativt',
(if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat) =< 0.15, $(vBackground1)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat) > 0.15 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat)<0.30, $(vTertiaryData4)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat)>=0.30 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat)<0.45, $(vTertiaryData3)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat)>=0.45 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat) <0.60, $(vTertiaryData2)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kvantitativt_ræsonnement, uniTEST_resultat)>=0.60, $(vTertiaryData1))),

If(ValueList('uniTEST','Kvantitativt','Kristisk','Videnskabeligt','Sprogligt','Interprsonelt') ='Kristisk',
(if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat) =< 0.15, $(vBackground1)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat) > 0.15 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat)<0.30, $(vTertiaryData4)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat)>=0.30 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat)<0.45, $(vTertiaryData3)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat)>=0.45 and
Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat) <0.60, $(vTertiaryData2)) &
if(Correl({< year1={‘1’},type_stat={'3'}, Kritisk_ræsonnement-={''}, uniTEST_resultat-={''} >} Kritisk_ræsonnement, uniTEST_resultat)>=0.60, $(vTertiaryData1))),

ect

I have also tried with wildmacth, where i have created a inline in the script, to be used as a dimension and color selection

sorry for the long post