如何新增col 並將單數row為1,雙數row為0

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

data <- data.frame(index = 1:9, name = c("A", "B", "C", "A", "A", "C", "B", "C", "A"), amount = c(10,14,3,4,15,9,12,6,7))

ydata :

index	name	amount
1	A	10
2	B	14
3	C	3
4	A	4
5	A	15
6	C	9
7	B	12
8	C	6
9	A	7

如何能在 ydata, 做出以下效果呢, 不停的1,0,1,0到dataframe 的尾

index	name	amount	type
1	A	10	1
2	B	14	0
3	C	3	1
4	A	4	0
5	A	15	1
6	C	9	0
7	B	12	1
8	C	6	0
9	A	7	1

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：col data

data <- data.frame(index = 1:9, name = c("A", "B", "C", "A", "A", "C", "B", "C", "A"), amount = c(10,14,3,4,15,9,12,6,7), type = index %% 2)

1. > type <- rep(c(1, 0), ceiling(nrow(data)/2))
   
2. > data.frame(data, type = type[1:nrow(data)])
   
3.   index name amount type
   
4. 1     1    A     10    1
   
5. 2     2    B     14    0
   
6. 3     3    C      3    1
   
7. 4     4    A      4    0
   
8. 5     5    A     15    1
   
9. 6     6    C      9    0
   
10. 7     7    B     12    1
    
11. 8     8    C      6    0
    
12. 9     9    A      7    1

复制代码

1. data$temp = 0
   
2. data[seq(2, nrow(data), 2),]$temp  = 1

复制代码

jinkelazzz 发表于 2018-4-26 09:02
data

你的思路用data.frame()是无法实现的，要用dplyr::data_frame()才行

感謝大家热心帮助