Question

我有一个数据框，其值由逗号或空格分隔。如何围绕这些值？

数据框如下所示：

test_type      test_runs       test_values
a              2               0.522,0.433
b              3               1.233,1.455,1.344

我想舍入值，输出没有列表的列，并使用gridextra打印出固定位数的数据帧。

library(dplyr)
data <- data.frame(test_type = c("a","a","b","b","b"),
                   test_values = c(0.522,0.433,1.233,1.455,1.344)) %>%
  group_by(test_type) %>%
  summarise(test_runs=n(), test_values=paste(test_values, collapse=","))

round_data <- round(data, digits=2)

Answer 1

来自tidyverse的解决方案。 dt2是最终输出。

# Create example data frame
dt <- read.table(text = "test_type      test_runs       test_values
                 a              2               0.522,0.433
                 b              3               1.233,1.455,1.344",
                 header = TRUE, stringsAsFactors = FALSE)

# Load package
library(tidyverse)

# Process the data
dt2 <- dt %>%
  mutate(test_values = strsplit(test_values, split = ",")) %>%
  mutate(test_values = map(test_values, as.numeric)) %>%
  mutate(test_values = map(test_values, formatC, format = "f", digits = 2)) %>%
  mutate(test_values = map_chr(test_values, paste, collapse = ","))

数据框中的圆值由R中的逗号分隔

1 个答案: