Ignore:
Timestamp:
Oct 26, 2011, 11:36:56 AM (13 years ago)
Author:
campagne
Message:

continue improve analysis (jec)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • BAORadio/AmasNancay/trunk/etude_mergeAna.pic

    r588 r591  
    1818
    1919echo $nbins1420
    20 
    2120
    2221
     
    2625clearscript IntAt1420
    2726clearscript sigmaRaw1420Side
     27clearscript sigmaRaw1400a1420
    2828############################################################################
    2929defscript evolAtCalibFreq
     
    150150
    151151
    152 
    153 
    154 #col 13 = onoffRaw01420side
    155 #col 14 = onoffRaw11420side
     152#col 13 = onoffRaw01420side   Ch 0
     153#col 14 = onoffRaw11420side   Ch 1
    156154
    157155ntcol2var onoffevol 13 linCh0All
     
    161159line2vec vecCh1All $linCh1All
    162160
    163 
     161#packing values only valid for 500 cycles...
    164162set packVal "1 10 25 50 100"
    165163set sigmaCh0 ""
     
    188186  mean1 = ${outvec.sum}/${outvec.size}
    189187  sigma1 = sqrt(${outvec.sumsq}/${outvec.size}-${mean1}*${mean1})
    190   errsig1 = ${sigma0}/sqrt(2*${outvec.size})   
     188  errsig1 = ${sigma1}/sqrt(2*${outvec.size})   
    191189  set sigmaCh1 "${sigmaCh1} ${sigma1}" 
    192190  set errsigCh1 "${errsigCh1} ${errsig1}"
     
    222220
    223221endscript
     222##################################################
     223defscript sigmaRaw1400a1420
     224
     225c++compile rebining
     226c++link rebining.so dorebin
     227
     228
     229#col 19 = onoffRaw0f14001420   Ch 0
     230#col 20 = onoffRaw1f14001420  Ch 1
     231
     232ntcol2var onoffevol 19 linCh0All
     233line2vec vecCh0All $linCh0All
     234
     235ntcol2var onoffevol 20 linCh1All
     236line2vec vecCh1All $linCh1All
     237
     238#packing values only valid for 500 cycles...
     239set packVal "1 10 25 50 100"
     240set sigmaCh0 ""
     241set errsigCh0 ""
     242set sigmaCh1 ""
     243set errsigCh1 ""
     244
     245
     246foreach ipack ( $packVal )
     247
     248#Packing per ipack
     249  del invec
     250  del outvec
     251  cp vecCh0All invec
     252  call dorebin $ipack
     253  mean0 = ${outvec.sum}/${outvec.size}
     254  sigma0 = sqrt(${outvec.sumsq}/${outvec.size}-${mean0}*${mean0})
     255  errsig0 = ${sigma0}/sqrt(2*${outvec.size})   
     256  set sigmaCh0 "${sigmaCh0} ${sigma0}" 
     257  set errsigCh0 "${errsigCh0} ${errsig0}"       
     258#
     259  del invec
     260  del outvec
     261  cp vecCh1All invec
     262  call dorebin $ipack
     263  mean1 = ${outvec.sum}/${outvec.size}
     264  sigma1 = sqrt(${outvec.sumsq}/${outvec.size}-${mean1}*${mean1})
     265  errsig1 = ${sigma1}/sqrt(2*${outvec.size})   
     266  set sigmaCh1 "${sigmaCh1} ${sigma1}" 
     267  set errsigCh1 "${errsigCh1} ${errsig1}"
     268end
     269
     270
     271newnt nt0 x y ey
     272newnt nt1 x y ey
     273
     274set x0 ( $packVal )
     275set y0 ( $sigmaCh0 )
     276set ey0 ( $errsigCh0 )
     277
     278set x1 ( $packVal )
     279set y1 ( $sigmaCh1 )
     280set ey1 ( $errsigCh1 )
     281       
     282for i 0:$#x0
     283 line2nt nt0 $x0[i] $y0[i] $ey0[i]
     284 line2nt nt1 $x1[i] $y1[i] $ey1[i]
     285end
     286
     287
     288newwin 1 1
     289plot2de nt0 x y 0 ey 1 "blue marker=fcircle,9 notit nsta"     
     290plot2de nt1 x y 0 ey 1 "same red  marker=fcircle,9 notit nsta"
     291n = ${#x0}-1
     292func $y0[0]/sqrt(x) $x0[0] $x0[n]  100 "same"
     293settitle "Sigma [1400,1420]MHz ${source} Ch 0 (blue) Ch 1 (red)" ' ' $defatt
     294setaxelabels "num of cycles" "Sigma (a.u)" $axedefatt
     295
     296
     297
     298endscript
    224299###########################################
     300
    225301defscript evolAt1420SideFreq
    226302
     
    361437# Calibration coeff. per cycles
    362438#
     439
     440graphicatt "xylimits=1250,1500,-0.01,0.01"
     441del sonoffovoff0 sonoffovoff1
     442objaoper meanOvOffNoCalib row 0 sonoffovoff0
     443objaoper meanOvOffNoCalib row 1 sonoffovoff1
     444newwin 1 1
     445plot2d sonoffovoff0 (n/8192)*250+1250 val n>0 "blue cpts notit nsta"
     446plot2d sonoffovoff1 (n/8192)*250+1250 val n>0 "red same cpts notit nsta"
     447settitle "Raw (ON-OFF)/OFF  ${source} Ch 0 (blue) Ch 1 (red) ${ncycles}cycles" ' ' $defatt
     448setaxelabels "Freq. (MHz)" "I (a.u)" $axedefatt
    363449
    364450
Note: See TracChangeset for help on using the changeset viewer.