为多个变量分配相同的值

Mar*_*ler 2 r

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

R中的质量变量声明和赋值?

在R中的单行中为LHS分配多个新变量

这是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)
Run Code Online (Sandbox Code Playgroud)

感谢您的任何建议或帮助.我更喜欢基础解决方案R.对不起,如果答案很明显.

Mic*_*ico 7

怎么样(row.names在输出中插入尽可能多的行data.frame):

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
Run Code Online (Sandbox Code Playgroud)

或者(列名称不完全正确;感谢@Frank简化我的方法)

data.frame(a = .641, c = -6.198, d = 35.052)[ , rep(1:3, each = 10)]
Run Code Online (Sandbox Code Playgroud)


the*_*ail 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))
)
Run Code Online (Sandbox Code Playgroud)