2017-04-19 74 views
2

我希望将相同的值分配给data.frame中的多个变量。我在这里查看了几个看似相似的帖子,但似乎没有解决我的具体问题。将相同的值分配给多个变量

Mass variable declaration and assignment in R?

Assign multiple new variables on LHS in a single line in R

下面是一个例子data.frame我想创建:

data = data.frame(
    a1 = 0.614, a2 = 0.614, a3 = 0.614, a4 = 0.614, a5 = 0.614, 
    a6 = 0.614, a7 = 0.614, a8 = 0.614, a9 = 0.614, a10 = 0.614, 
    c1 = -6.198, c2 = -6.198, c3 = -6.198, c4 = -6.198, c5 = -6.198, 
    c6 = -6.198, c7 = -6.198, c8 = -6.198, c9 = -6.198, c10 = -6.198, 
    d1 = 35.952, d2 = 35.952, d3 = 35.952, d4 = 35.952, d5 = 35.952, 
    d6 = 35.952, d7 = 35.952, d8 = 35.952, d9 = 35.952, d10 = 35.952) 

谢谢你的任何意见或协助。我更喜欢基于R的解决方案。对不起,如果答案是明显的。

回答

7

怎么样(只要你想在输出data.frame行中插入多个row.names):

data = data.frame(row.names = '1') 
data[paste0('a', 1:10)] = .614 
data[paste0('c', 1:10)] = -6.198 
data[paste0('d', 1:10)] = 35.952 

或(列名不会是完全正确的;感谢@Frank这里简化我的方法)

data.frame(a = .641, c = -6.198, d = 35.052)[ , rep(1:3, each = 10)] 
+0

这两个答案都很好。我通常等24小时以上才能接受,但谢谢。 –

6

把一切都一气呵成:

n <- 10 
setNames(
    data.frame(rep(list(0.641,-6.198,35.952), each=n)), 
    paste0(rep(c("a","c","d"),each=n), seq_len(n)) 
) 
+0

我看不出如何调整这个,如果我们想在输出'data.frame'中多出一行(从头开始,nvm,只需要正确声明'list') – MichaelChirico

+1

@MichaelChirico - 代表(1,nrows),]'结束。 – thelatemail

+0

不错,我在我的例子中,例如在给定的列中重复'c(.641,.58)'多次,但两者都很容易适应这种方法 – MichaelChirico