如何从同一行的两列创建序列

Question

我有2列的数据框和可变数量的行示例：

   E    P
1  0.5  1
2  2    2.5
3  3.5  4
.  .    .  
.  .    .
n  En   Pn

我想创建一个从列“ E”的第一个值到列“ P”的第一个值的0.1的序列的data.frame，这是我做的代码：

  rows_covering <<- data.frame(c(c1 = list (seq (E[1],P[1], 0.1)),
                                           c2 = list (seq (E[2],P[2], 0.1)),
                                           c3 = list (seq (E[3],P[3], 0.1))
                                            ))

但是，随着行数的变化，每次手动更改它都是不好的，尤其是对于大量的行。是否可以自动执行？

Answer 1

您可以尝试

lapply(seq_along(E), function(x) list(seq(E[x], P[x], 0.1)))

Answer 2

整洁的方式...

df <- tibble(start = c(0.5, 0.2),
             end = c(1, 0.8))

df %>% mutate(seq = map2(start, end, ~seq(.x, .y, by = 0.1)))

Answer 3

我认为您必须使用seq（E [x]，P [x]，0.1）

E <- c(0.5, 2, 3.5)
P <- c(1, 2.5, 4)
my_seq <- lapply(seq_along(E), function (x) (seq(E[x], P[x], 0.1)))

my_seq

Answer 4

基本R选项是使用Map + seq

df <- within(df,rows_covering <- Map(seq,E,P,by = 0.1))

诸如此类

> df
    E   P                rows_covering
1 0.5 1.0 0.5, 0.6, 0.7, 0.8, 0.9, 1.0
2 2.0 2.5 2.0, 2.1, 2.2, 2.3, 2.4, 2.5
3 3.5 4.0 3.5, 3.6, 3.7, 3.8, 3.9, 4.0

DATA

df <- structure(list(E = c(0.5, 2, 3.5), P = c(1, 2.5, 4)), class = "data.frame", row.names = c(NA, 
-3L))

> df
    E   P
1 0.5 1.0
2 2.0 2.5
3 3.5 4.0