大家好，我想知道是否有人可以帮助我解决一些让我在开始使用 R 时遇到困难的问题？类似于 this post but in R .

本质上与 R.utils 函数 seqToHumanReadable 相反。

即

会变成:

非常感谢您的帮助!

我开始尝试 if，计算出每个带连字符的数字之间的差异，并通过循环运行多次以尝试添加额外的行，但结果一团糟。

编辑:哇，非常感谢大家的回复。解决了我的问题，让我有更多的东西可以继续阅读!

最佳答案

看起来有点麻烦，但它会返回您预期的输出:

library(dplyr)

df %>% 
 mutate(LLFCs = gsub('-', ':', LLFCs)) %>% 
 separate_rows(LLFCs, sep = ',') %>% 
 rowwise() %>% 
 mutate(LLFCs = ifelse(grepl(':', LLFCs), toString(eval(parse(text = LLFCs))), LLFCs)) %>% 
 separate_rows(LLFCs)

# A tibble: 13 × 3
   Title LLFCs   Red
   <chr> <chr> <dbl>
 1 a     15    11.6 
 2 a     18    11.6 
 3 b     16     9.08
 4 b     19     9.08
 5 c     112    6.45
 6 c     113    6.45
 7 c     114    6.45
 8 d     113    6.45
 9 d     114    6.45
10 d     115    6.45
11 d     145    6.45
12 d     146    6.45
13 d     147    6.45

关于r - 你如何在 R 中打开连字符和逗号分隔的数字范围？例如 1,3,5-7 -> 1,3,5,6,7 在不同的行，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/74773227/