cbassNorthThermal

0001 d=pipe_read('28-Nov-2012:19:48:01','28-Nov-2012:21:27:28')
0002 
0003 Lmean=d.antenna0.receiver.data(:,5)-d.antenna0.receiver.data(:,1);
0004 Rmean=d.antenna0.receiver.data(:,6)-d.antenna0.receiver.data(:,2);
0005 indextt=[1.3e5:1.4e5]
0006 Ldat=Lmean(indextt);
0007 Rdat=Rmean(indextt);
0008 
0009 Ldatm=Ldat-mean(Ldat);
0010 Rdatm=Rdat-mean(Rdat);
0011 
0012 BU2Kelvin=40.5 % Noise diode ~2.7K and is ~110BU ->
0013 
0014 plot(Ldatm/BU2Kelvin)
0015 hold all
0016 plot(Rdatm/BU2Kelvin)
0017 
0018 LdatK=Ldatm/BU2Kelvin;
0019 RdatK=Rdatm/BU2Kelvin;
0020 
0021 stdL = std(Ldatm/BU2Kelvin)
0022 stdR = std(Rdatm/BU2Kelvin)
0023 
0024 
0025 Lmeanm=mean(Lmean)-Lmean;
0026 
0027 subplot(211)
0028 plot(binRmean(1000:3000))
0029 title('RR')
0030 grid on
0031  
0032 subplot(212)
0033 plot(binLmean(1000:3000))
0034 title('LL')
0035 grid on