我有以下 dataframe
| 患者编号 | 价值 |
|---|---|
| 患者 1 | 4.3 |
| 病人 2 | 4.2 |
| 患者3 | <1.0 |
然而，value它不是numeric，我需要它。
我能够使用gregexpr（参见代码片段）并且它可以转换value为numeric，但是我如何保持value附加到patient_id，换句话说，我如何维护订单？
gfg <- patient_id$value
gfg_numbers <- regmatches(gfg, gregexpr("[[:digit:]]+", gfg))
as.numeric(unlist(gfg_numbers))
value_num <- as.numeric(unlist(gfg_numbers))
as.data.frame(value_num)
value_num_df <- as.data.frame(value_num)
我们可以用 parse_number
library(readr)
library(dplyr)
df %>%
mutate(value = parse_number(value))
输出：
patient_id value
<chr> <dbl>
1 "patient1" 4.3
2 "patient2 " 4.2
3 "patient3" 1
数据：
df <- tribble(
~patient_id, ~value,
"patient1", "4.3",
"patient2 ", "4.2",
"patient3", "< 1.0")
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句