|
DataMuseum.dkPresents historical artifacts from the history of: Jet Computer Jet80 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Jet Computer Jet80 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2304 (0x900)
Types: TextFile
Names: »SCIENCE.PC«
└─⟦a6ed1cd35⟧ Bits:30002862 Perfect Calc 1.10 for JET80 CP/M
└─ ⟦this⟧ »SCIENCE.PC«
>a1:" CHI-SQUARE ANALYSIS >a1:Øwc15 >b1:Øwc1 >d1:Øwc1 >f1:Øwc1 >h1:Øwc1 >j1:Øwc1 >l1:Øwc1 >a2:"Copyright, 1982, Perfect Software, Inc. >a3:"******************************************************************** >a4:" It is possible to enter data directly in the cells by using the >a5:" SEARCH for next unlocked field command (CRTL--S). >a7:"******************************************************************** >e9:" Independent Variable >a11:" Dependent >e11:"Chi-square >g11:=m35@ >i11:" d.f.= >k11:=(3-1)*(5-1)@ >a12:" Variable >b13:"------------------------------------------------------ >m13:" >b14:"I >c14:0 >d14:"I >e14:0 >f14:"I >g14:0 >h14:"I >i14:0 >j14:"I >k14:0 >l14:"I >m14:=c14+e14+g14+i14+k14@ >b15:"------------------------------------------------------ >b16:"I >c16:0 >d16:"I >e16:0 >f16:"I >g16:0 >h16:"I >i16:0 >j16:"I >k16:0 >l16:"I >m16:=c16+e16+g16+i16+k16@ >b17:"------------------------------------------------------ >b18:"I >c18:0 >d18:"I >e18:0 >f18:"I >g18:0 >h18:"I >i18:0 >j18:"I >k18:0 >l18:"I >m18:=c18+e18+g18+i18+k18@ >b19:"------------------------------------------------------ >m19:" >c20:=sum(c14:c18)@ >e20:=sum(e14:e18)@ >g20:=sum(g14:g18)@ >i20:=sum(i14:i18)@ >k20:=sum(k14:k18)@ >m20:=sum(m14:m18)@ >c27:=(c20*m14)/m20@ >e27:=(e20*m14)/m20@ >g27:=(g20*m14)/m20@ >i27:=(i20*m14)/m20@ >k27:=(k20*m14)/m20@ >c28:=(c20*m16)/m20@ >e28:=(e20*m16)/m20@ >g28:=(g20*m16)/m20@ >i28:=(i20*m16)/m20@ >k28:=(k20*m16)/m20@ >c29:=(c20*m18)/m20@ >e29:=(e20*m18)/m20@ >g29:=(g20*m18)/m20@ >i29:=(i20*m18)/m20@ >k29:=(k20*m18)/m20@ >c31:=(c14-c27)/c27@ >e31:=(e14-e27)/e27@ >g31:=(g14-g27)/g27@ >i31:=(i14-i27)/i27@ >k31:=(k14-k27)/k27@ >m31:=c31+e31+g31+i31+k31@ >c32:=(c16-c28)/c28@ >e32:=(e16-e28)/e28@ >g32:=(g16-g28)/g28@ >i32:=(i16-i28)/i28@ >k32:=(k16-k28)/k28@ >m32:=c32+e32+g32+i32+k32@ >c33:=(c18-c29)/c29@ >e33:=(e18-e29)/e29@ >g33:=(g18-g29)/g29@ >i33:=(i18-i29)/i29@ >k33:=(k18-k29)/k29@ >m33:=c33+e33+g33+i33+k33@ >m34:=m31+m32+m33@ >a1 «eof»