4Misc_Start4Platform@ xHH%.7@gyHHdh xHH%.7@gyHHdh x HH%.7@gyHHdh ^Graph*WDashSettings#  ! 2x6Normal@ Lucida Console<HHHH$$4 4 4 4 4 4 homedC:Users:A0003897:# ONDL:# ONDL Projects:# 2016 Dopant Interlayer:Computational Methods:(IGOR) OFET_Rc Extraction:C:Users:A0003897:# ONDL:# ONDL Projects:# 2016 Dopant Interlayer:Computational Methods:(IGOR) OFET_Rc ExtractionNDL\# ONDL Projects\# 2016 (IGOR) OFET_Rc Extractionional Methods\iC:\Users\A000389# ONDLHL ?RecentWindows Table0:D2D 4Misc_EndTXOPState_Start PeakFunctions2-64a Conso4XOPState_EndX_avebg @Y_ave8iAz test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 W_coef end parameters, -5495.42, 2.00508, 175399, 0 W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, -5495.42, 2.00508, 175399, 1 W_coef starting parameters, 1, 2.00508, 175399, 2 W_coef end parameters, -5495.42, 2.00508, 175399, 2 W_coef starting parameters, 1, 2.00508, 175399, 3 W_coef end parameters, -5495.42, 2.00508, 175399, 3 W_coef starting parameters, 1, 2.00508, 175399, 4 W_coef end parameters, -5495.42, 2.00508, 175399, 4 W_coef starting parameters, 1, 2.00508, 175399, 5 W_coef end parameters, -5495.42, 2.00508, 175399, 5 W_coef starting parameters, 1, 2.00508, 175399, 6 W_coef end parameters, -5495.42, 2.00508, 175399, 6 W_coef starting parameters, 1, 2.00508, 175399, 7 W_coef end parameters, -5495.42, 2.00508, 175399, 7 W_coef starting parameters, 1, 2.00508, 175399, 8 W_coef end parameters, -5495.42, 2.00508, 175399, 8 W_coef starting parameters, 1, 2.00508, 175399, 9 W_coef end parameters, -5495.42, 2.00508, 175399, 9 W_coef starting parameters, 1, 2.00508, 175399, 10 W_coef end parameters, -5495.42, 2.00508, 175399, 10 W_coef starting parameters, 1, 2.00508, 175399, 11 W_coef end parameters, -5495.42, 2.00508, 175399, 11 W_coef starting parameters, 1, 2.00508, 175399, 12 W_coef end parameters, -5495.42, 2.00508, 175399, 12 Edit/K=0 root:D1D Edit/K=0 root:D2D test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 Edit/K=0 root:waveX test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 Edit/K=0 root:K0_c Edit/K=0 root:D2D Edit/K=0 root:K0_c test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 Edit/K=0 root:D2D Edit/K=0 root:waveX test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 test2D() W_coef starting parameters, 1, 2.00508, 175399, 0 Insufficient data points W_coef starting parameters, 1, 2.00508, 175399, 1 W_coef end parameters, 1.81091e+06, 2.00508, 175399, 1 !z7$jHBւD2D ????p?K@K7JgJ7K0 K IPIaJKhЏKJP+K@^JJ5J$tI[InJqJa K[JjIJI[JA1wJI|IPII 4J,JI,I@!J@-J$HHaIaI5IIPCI7I>I9JPHHOIOI,I,I|I|IjII|H|H*IIOIOI$H$HˤII$tH$tHGIGI*I*IPHPHaIaI$tH$tHHH|IGIHH$tI$tIPCHPCHPHPH$H$H|H|H[I[IPCHPCHHHHH|H|HPCIPCIPCHPCH|H|HPHPH$tH$tHmhHB D1D ????7JgJ7K0 K=hPB waveX ????HBHB@@pApAAA A AjLVBW_coef????I;S@I+HoXBW_sigma????Sƙ@ tKB K0_c ????I*// Platform=WindowsNT, IGORVersion=7.080, architecture=Intel, systemTextEncoding="Windows-1252", historyTextEncoding="Windows-1252", procwinTextEncoding="Windows-1252", recreationTextEncoding="Windows-1252", build=31118 #pragma TextEncoding = "Windows-1252" Silent 101 // use | as bitwise or -- not comment. DefaultFont "Arial" Table0() MoveWindow/C 7.5,584.75,1432.5,740.75 MoveWindow/P 700.5,50,1400.25,686 KillStrings/Z root:gWMSetNextTextFilesTextEncoding Window Table0() : Table PauseUpdate; Silent 1 // building window... Edit/W=(5.25,41.75,1199.25,265.25) D2D ModifyTable format(Point)=1 MoveWindow 0, 0, 0, 0 // Minimize the window. EndMacro  #pragma TextEncoding = "Windows-1252" #pragma rtGlobals=3 // Use modern global access method and strict wave access. function Test2D() make/o/n = (10,13) D2D //to input data from main file manually make/o/n = 10 D1D make/o/n = 10 waveX = {50,50,5,5,15,15,20,20,10,10} make/o/n = 13 K0_c variable/g X_ave = 2.00508 //value pre-determined from earlier procedure variable/g Y_ave = 175399 //value pre-determined from earlier procedure variable aa //aa: cols of D2D file for (aa = 0; aa < 13; aa += 1) D1D[] = D2D[p][aa] wavestats /M=1 /Q D1D make/o/n=3 W_coef W_coef = {1, X_ave, Y_ave} //"1" arbitrarily chosen, less likely to give error than "0" printf "%s, %g, %g, %g, %g\r", "W_coef starting parameters", W_coef[0], W_coef[1], W_coef[2], aa if (V_npnts > 2) FuncFit /Q /H="011" lineFit, kwcWave=W_coef, D1D /X=waveX else printf "%s\r", "Insufficient data points" continue endif printf "%s, %g, %g, %g, %g\r", "W_coef end parameters", W_coef[0], W_coef[1], W_coef[2], aa K0_c[aa] = W_coef[0] endfor end //-------------------------------------------------------------------------------- function lineFit(w, x) : FitFunc wave w variable x variable val val = w[0] * (x - w[1]) + w[2] //w[1] < 0 return val end