Statistics 板


LINE

请问各位高手, 我该如何计算每个读入资料的样本数(n),再代入下面的原程式呢? ( 注:下面的程式後面有标明有使用到N的地方 ) 因为我有好几千笔资料,若每次因为n不同而要改下面的N,实在很头大 Orz 昨晚想了几个办法,但似乎都不可行,所以上来请教各位高手们 ( 跪求~~~~ ) 1.每个PRN档的原始资料大概长的如下,但每次读入的样本数(n)不尽相同。 64.49481 69.85545 69.83425 73.84243 65.98784 . . . . 2.原程式部份, %MACRO a (yyyyy,aaaaaaa,c); data b; %LET f=%str (%'f:\Dr Liu\&yyyyy\&aaaaaaa..prn%'); infile %unquote(&f); input pot1-pot31; <<====== N=31 array pot {31} pot1-pot31; <<====== N=31 c=0; do i=1 to 31; <<====== N=31 do j=i+1 to 31; <<====== N=31 b=pot(i)-pot(j); e=abs(b); a=e; put a=; diff=c+a; c=diff; end; end; put diff=; sum=0; do i=1 to 31; <<====== N=31 c=sum+pot(i); sum=c; end; averg=sum/31; <<====== N=31 put averg=; g=diff /(2*31*31*averg); <<====== N=31 put g; run; data C&c; set b ; if g=. then g='─'; Gini&c= g; keep Gini&c; run; %MEND a; --



※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 192.192.124.101
1F:→ west1996:把你的N也写成一个macro variable就好啦 02/27 09:36
2F:→ ivylouise:这样子不就要知道每个读入档案的N Orz 02/27 09:58
3F:推 chien533:写个有proc means的macro去算出每个档案的N,然後另存新 02/27 11:21
4F:→ ivylouise:不过...谢谢你的建议 02/27 11:21
5F:→ chien533:资料档,再用一个data step使用call symput去把新资料档 02/27 11:22
6F:推 tew:虽然你说样本数,可是就资料来看 似乎是变项数目 02/27 11:26
7F:→ chien533:里面的N存成巨集变数,然後用do loop去跑这些巨集变数 02/27 11:28
8F:→ chien533:看看这篇有无帮助:http://ppt.cc/ZcN2 02/27 11:29
9F:推 tew:应该说 就你的input pot1 -pot31 02/27 11:29
10F:推 tew:这样子是变项数目 而非样本数 02/27 11:30
11F:→ ivylouise:谢谢CH大~~~感谢你的资料^^ 02/27 13:42
12F:→ ivylouise:t大..我是把资料转过来..类似像算这个变项的平方和 02/27 13:55
13F:推 tew:ㄜ..orz 那根本不需要用到这麽复杂的语法 02/27 16:53
14F:→ sneak: 里面的N存成巨集变数, https://daxiv.com 11/09 14:46
15F:→ sneak: 不过...谢谢你的建议 http://yofuk.com 01/02 14:50







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:WOW 或 站内搜寻

TOP