我有一个 1666 行的数据框。我想添加一个具有重复序列的列,1:5以用于cut()进行交叉验证。它看起来像这样:
Y x1 x2 Id1
1 .15 3.6 1
0 1.1 2.2 2
0 .05 3.3 3
0 .45 2.8 4
1 .85 3.1 5
1 1.01 2.9 1
... ... ... ...
Run Code Online (Sandbox Code Playgroud) 这可能很容易,但我一直在尝试并且未能找到解决方案,而且我认为我正试图在圆孔中安装方形钉lapply等.
我有一个函数,其中一个子函数将调用编号列表对象.数字将在一个循环中因此改变,数字和循环大小取决于用户值,所以我不知道它会是什么.如果用户没有输入其中一个变量的矢量值列表,我需要设置一个默认值.
子功能是期望的,例如c(2,6)
子功能当前循环8次,所以我需要一个八次的列表c(2,6).但是:object = as.list(rep(c(2,6),8))得到16个单个数字的列表:2 6 2 6 2 6 2 6依此类推.
任何想法我如何强制R创建例如8个向量的列表,而不是例如16个单个数字?我试过了,drop=0但没有帮助,我正在努力探索如何lapply开始工作.
我有一年的范围1981:1984.如何使用rep()函数得到以下结果:对于每一轮代表,最近的一年被删除:首先获得1981:1984,然后是1981:1983,然后是1981:1982,然后是1981年,如表所示:
1981
1982
1983
1984
1981
1982
1983
1981
1982
1981
Run Code Online (Sandbox Code Playgroud) 我想创建以下矢量序列.
0 1 0 0 2 0 0 0 3 0 0 0 0 4
Run Code Online (Sandbox Code Playgroud)
我的想法是创造0先用rep(),但不知道如何添加1:4.
我有一个“大小”或“宽度”向量,如下所示:
x <- c(1, 4, 6, 10)
Run Code Online (Sandbox Code Playgroud)
我想创建另一个基于 的向量x,一个像这样的向量:
y <- c(" ", " ", " ", " ")
Run Code Online (Sandbox Code Playgroud)
基本上有两个用于创建的输入y:空白空间" "和向量x。
正如您所看到的,向量x定义了 中空格的长度y。我知道我可以从头开始创建一个函数,但我猜测 R 中是否存在某种函数或与rep或paste0其他内置函数的组合。
任何想法?谢谢。
我试图在一个范围内创建一系列数字,跳过每4个数字.我知道它可能涉及seq或seq_len不知何故,但我似乎无法直截了当.
序列应该是这样的:
c(1,2,3,5,6,7,9,10,11...48)
Run Code Online (Sandbox Code Playgroud) 我的R课程有一个工作簿问题,我无法弄明白.我需要"编写一个使用rep()的R命令来创建一个带元素的向量1 2 3 4 2 3 4 5 3 4 5 6 4 5 6 7"
它似乎是1至4的重复序列,重复4次,并且在每次重复时将1加到起始元素上.我对R很新,所以我很难过.任何帮助,将不胜感激.
当我表演时:
a <- seq(1,1.5,0.1)
b <- c(1,1.1,1.4,1.5)
x <- rep(c(a,b),times=c(2,1))
Run Code Online (Sandbox Code Playgroud)
rep(c(a,b),c(2,1))出错:无效的'times'参数
为什么?
我有一个包含以下内容的向量:
my.var <- c("a","b","c","d","e","f")
my.var
[1] "a" "b" "c" "d" "e" "f"
Run Code Online (Sandbox Code Playgroud)
我想只使用rep和seq函数来解决这个问题:
"a" "b" "c" "b" "c" "d" "c" "d" "e" "d" "e" "f"
Run Code Online (Sandbox Code Playgroud) 假设我有一个数字向量 v
v <- 1:5
Run Code Online (Sandbox Code Playgroud)
我想要
rep
v[1]通过v[1]倍。
v[2]到v[2]时候……等等……
所需的输出是:
1 2 2 3 3 3 4 4 4 4 5 5 5 5 5
Run Code Online (Sandbox Code Playgroud)
以下不起作用。有什么想法吗?
rep(v, each = function(x) v[x])
Run Code Online (Sandbox Code Playgroud)
提前谢谢了。