代码中Freq[i]中的i所指意思

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. > mytable
   
2. treatment improved Freq
   
3. 1 Placebo None 29
   
4. 2 Treated None 13
   
5. 3 Placebo Some 7
   
6. 4 Treated Some 17
   
7. 5 Placebo Marked 7
   
8. 6 Treated Marked 21

复制代码

> table2flat<-function(mytable){
+ df<-as.data.frame(mytable)
+ rows<-dim(df)[1]
+ cols<-dim(df)[2]
+ x<-NULL
+ for(i in 1:rows){
+ for(j in 1:df$Freq[i]){
+ row<-df[i,c(1:(cols-1))]
+ x<-rbind(x,row)
+ }
+ }
+ row.names(x)<-c(1:dim(x)[1])
+ return(x)
+ }


加亮Freq里面的i指的是表格里面的29,7,7,13,17,21吗？

下面是程序输出的表格

> mydata<-table2flat(mytable)
> mydata
   treatment improved
1    Placebo     None
2    Placebo     None
3    Placebo     None
4    Placebo     None
5    Treated     None
6    Placebo     Some
7    Placebo     Some
8    Placebo     Some
9    Placebo     Some
10   Placebo     Some
11   Treated     Some
12   Treated     Some
13   Placebo   Marked
14   Placebo   Marked
15   Placebo   Marked
16   Placebo   Marked
17   Placebo   Marked
18   Treated   Marked
19   Treated   Marked
20   Treated   Marked

不是很明白循环的次数，请大神们指教！！谢谢！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：freq REQ Fre treatment Improved function return

df$Freq[i] 结果输出来，看看就知道了

mytable出了錯。正確的mytable在treatment前應該有個space證明table是對的。
> mytable
  treatment improved Freq
1   Placebo     None   29
2   Treated     None   13
3   Placebo     Some    7
4   Treated     Some   17
5   Placebo   Marked    7
6   Treated   Marked   21
如果你是read.csv()，你得把每行前的1, 2, 3, 4, 5, 6去掉在讀進來。
否則你的df$Freq就會指向"None", "Some", ...
> df$Freq[1]
[1] None
Levels: Marked None Some
而非29, 13, 7, 17, 7, 21

dcwang1233 发表于 2016-6-15 01:32
mytable出了錯。正確的mytable在treatment前應該有個space證明table是對的。
> mytable
  treatment impr ...

是有空格的，前面的12345是序号，可能复制粘贴过来的时候格式有点问题。
那意思就是说格式没有问题的话，循环的里面的Freq就应该循环的是Freq下面的数字吗？？谢谢~

辛巴菌 发表于 2016-6-15 09:22
是有空格的，前面的12345是序号，可能复制粘贴过来的时候格式有点问题。
那意思就是说格式没有问题的话， ...

格式沒問題的話，結果就對了。

dcwang1233 发表于 2016-6-15 10:00
格式沒問題的話，結果就對了。

那我理解的意思就是Placebo None会重复29行，然后Treated None会重复13行，以此类推这样？？

沒錯。我用R運算的結果正是如此。

dcwang1233 发表于 2016-6-15 11:26
沒錯。我用R運算的結果正是如此。

好奇怪，我为什么运行不是这样。。恩 谢谢啦~

辛巴菌 发表于 2016-6-15 11:31
好奇怪，我为什么运行不是这样。。恩 谢谢啦~

> mytable
  treatment improved Freq
1   Placebo     None   29
2   Treated     None   13
3   Placebo     Some    7
4   Treated     Some   17
5   Placebo   Marked    7
6   Treated   Marked   21
> mydata<-table2flat(mytable)
> mydata
   treatment improved
1    Placebo     None
2    Placebo     None
3    Placebo     None
4    Placebo     None
5    Placebo     None
6    Placebo     None
7    Placebo     None
8    Placebo     None
9    Placebo     None
10   Placebo     None
11   Placebo     None
12   Placebo     None
13   Placebo     None
14   Placebo     None
15   Placebo     None
16   Placebo     None
17   Placebo     None
18   Placebo     None
19   Placebo     None
20   Placebo     None
21   Placebo     None
22   Placebo     None
23   Placebo     None
24   Placebo     None
25   Placebo     None
26   Placebo     None
27   Placebo     None
28   Placebo     None
29   Placebo     None
30   Treated     None
31   Treated     None
32   Treated     None
33   Treated     None
34   Treated     None
35   Treated     None
36   Treated     None
37   Treated     None
38   Treated     None
39   Treated     None
40   Treated     None
41   Treated     None
42   Treated     None
43   Placebo     Some
44   Placebo     Some
45   Placebo     Some
46   Placebo     Some
47   Placebo     Some
48   Placebo     Some
49   Placebo     Some
50   Treated     Some
51   Treated     Some
52   Treated     Some
53   Treated     Some
54   Treated     Some
55   Treated     Some
56   Treated     Some
57   Treated     Some
58   Treated     Some
59   Treated     Some
60   Treated     Some
61   Treated     Some
62   Treated     Some
63   Treated     Some
64   Treated     Some
65   Treated     Some
66   Treated     Some
67   Placebo   Marked
68   Placebo   Marked
69   Placebo   Marked
70   Placebo   Marked
71   Placebo   Marked
72   Placebo   Marked
73   Placebo   Marked
74   Treated   Marked
75   Treated   Marked
76   Treated   Marked
77   Treated   Marked
78   Treated   Marked
79   Treated   Marked
80   Treated   Marked
81   Treated   Marked
82   Treated   Marked
83   Treated   Marked
84   Treated   Marked
85   Treated   Marked
86   Treated   Marked
87   Treated   Marked
88   Treated   Marked
89   Treated   Marked
90   Treated   Marked
91   Treated   Marked
92   Treated   Marked
93   Treated   Marked
94   Treated   Marked

dcwang1233 发表于 2016-6-15 11:55
> mytable
  treatment improved Freq
1   Placebo     None   29

tab.xlsx (7.79 KB)

2016-6-15 12:00:53 上传

使用這文件