42-*_*42- 42
你可以通过一个rep电话完成.首先完成each并times依次评估和参数each.
rep(1:4, times=3, each=3)
#[1] 1 1 1 2 2 2 3 3 3 4 4 4 1 1 1 2 2 2 3 3 3 4 4 4 1 1 1 2 2 2 3 3 3 4 4 4
Run Code Online (Sandbox Code Playgroud)
Die*_*nne 18
或者,更简单(假设你的意思是矢量,而不是数组)
rep(rep(1:4,each=3),3)
Run Code Online (Sandbox Code Playgroud)
如果您的数字序列以1为增量递增,则42-的答案将起作用。但是,如果要包含以设定间隔(例如,从0到60乘以15)递增的数字序列,则可以执行以下操作:
rep(seq(0,60,15), times = 3)
[1] 0 15 30 45 60 0 15 30 45 60 0 15 30 45 60
Run Code Online (Sandbox Code Playgroud)
您只需更改要重复的次数。