esim: /DISCRL ...

[vastaus aiempaan viestiin]

Kirjoittaja: Petri Palmu
Sähköposti:    -
Päiväys: 19.1.2008 16:49

*Moi,
*
*Tässä on pieni esimerkki siitä, miten säästän vaivaa
*erotteluanalyysissa tarvittavissa ryhmittäisissä
*msn ja corr matriiseissa hyödyntämällä tuota luupitussukroa.
*
*Luupataan yli datan PADAT1 osa-aineistojen (TASEMAd).
*Etukäteen ei tarvitse tietää osa-aineistojen lukumäärää, vaikka
*toki nyt ryhmät, joista ollaan kiinnostuneita, tunnetaan hyvin ;)
*
*.................................
*
*/REP k,CUR+1,K  / DATA=PADAT1 FORI=$i GROUPVAR=TASEMAd
*
*
*
*.......................
* kierros :  $i
*.................
*FILE SHOW PADAT1
*MASK=-AAAAAAAAAAAAAAAA----
*
kCORR PADAT1           / SELECT=C1 C1=TASEMAd,$i
*....................
kMAT R$i=CORR.M    /
kMAT M$i=MSN.M     /
kPUTEND H+1,H+1,R$i;
kPUTEND H+2,H+2,M$i;
*.............................
*
K  --- end ---
*
*.................................
* Tulostetaan Ri,Mi matriisit
*/DISCRL
H
* CORR=
* MSN=
*
*..................
*Aktivoidaan /REP ja odotetaan tovi...
*
* PUTEND tulostaa (vaiheittain):
*
* CORR=R1;R2;R3;R4;R5;
* MSN=M1;M2;M3;M4;M5;
*
*REPLACE "; " ""    / LINES=CUR-3,CUR-2
*REPLACE ";" "," C  / LINES=CUR-4,CUR-3
*
*Tuosta kun korvaa ;  pilkuilla, niin homma on
*valmis erotteluanalyysikomentoa varten. Tässä ohessa
*voisi tuottaa muutakin ryhmäkohtaista statistiikkaa
*esim. STAT, PLOT avulla (ja tallentaa tulokset
*tiedostoon dokumentoiden).
*
*.....................
*
*Toki koko ruljanssin voi tehdä käsin, mutta
*toistettavuus esim. virhetilanteissa - joissa mahd. joudutaan
*aloittamaan homma alusta - on mielestäni paljon parempi
*tällä tavoin automatisoituna :)
*
*
*t. Petri
*
*
*
*

Vastaukset:
[ei vastauksia]

Survo-keskustelupalstan (2001-2013) viestit arkistoitiin aika ajoin sukrolla, joka automaattisesti rakensi viesteistä (yli 1600 kpl) HTML-muotoisen sivukokonaisuuden. Vuoden 2013 alusta Survo-keskustelua on jatkettu entistäkin aktiivisemmin osoitteessa forum.survo.fi. Tervetuloa mukaan!

Etusivu  |  Keskustelu
Copyright © Survo Systems 2001-2013. All rights reserved.
Updated 2013-06-15.