tidyverse

    2热度

    1回答

    我想将数据集导入RStudio,但是我被中文字符卡住了,因为它们变成乱码。这里是代码: library(tidyverse) df <- read_csv("中文,英文\n英文,德文") df # A tibble: 1 x 2 `\xd6\xd0\xce\xc4` `Ӣ\xce\xc4` <chr> <chr> 1 "<U+04E2>\xce\xc4

    0热度

    2回答

    如何使用fwf将行向量(不是文件)读入数据帧? 现在,我可以想到两种方法,但我真的觉得应该有更好的方法。任何想法是赞赏。 使用data.frame() + substring()。它可以完成这项工作,但如果数据“不整齐”(就像下面的块一样),我不能简单地推广它。我从这里得到答案:Read fixed width text file 使用write_lines()和read_fwf() from r

    5热度

    2回答

    我想了解是否以及如何使用tidyverse框架可以实现。 假设我有以下简单功能: my_fn <- function(list_char) { data.frame(comma_separated = rep(paste0(list_char, collapse = ","),2), second_col = "test", stringsAsFactors =

    2热度

    2回答

    我期待在几个月内创建几小时的循环图。我希望它看起来像情节波澜。我的目标是绘制一个水平线表示每个月的平均温度,然后在每个月的图表中显示该月典型日子的温度波动。我试图用monthplot()但似乎并不奏效: library(nycflights13) tempdata <- weather %>% group_by(hour) monthplot(tempdata, labels = NULL

    7热度

    2回答

    我有一个从REST调用收到的嵌套列表。响应包括来自底层关系数据库的嵌套的一组列表。我想将这个列表展平以简化分析。我试图遵循purrr tutorial中的指导原则,但我无法实现。 我的简化输入 hist1 <- list(field="type", from_string ="issue", to_string="bug") hist2 <- list(field="status", from_

    1热度

    2回答

    我有一个数据框只列出十月到四月的月份。当我将这些数据绘制在折线图上时,它也包含未使用的月份。我只想显示数据中列出的月份,因此图上没有未使用的空间。 我使用的情节代码 gplot(df,aes(GAME_DATE,DEF_RATING)) + geom_line(aes(y=rollmean(df$DEF_RATING,9, na.pad = TRUE))) + geom_lin

    2热度

    1回答

    我有包含两组数据观测一个数据帧(A,B),与由列名称给定的数据集和观测类型: mydf <- data.frame(meta1=paste0("a",1:2), meta2=paste0("b",1:2), A_var1 = c(11:12), A_var2 = c("p","r"), B_var1 = c(21:22), B_var2 = c("x","z")

    2热度

    1回答

    代码示出了如: readr::parse_double("123,456,789.987", locale = locale(decimal_mark = ".", grouping_mark = ",")) 其中预期的结果是:123456789.987 但原来的错误: 1 parsing failure. row # A tibble: 1 x

    1热度

    2回答

    我经常发现自己在一个情况下,我有一个包含宽列的多组,像这样的表: replicate groupA VA1 VA2 groupB VB1 VB2 1 1 a 0.3429166 -2.30336406 f 0.05363582 1.6454078 2 2 b -1.3183732 -0.13516849 g -0.42586417 0.1541541 3 3

    1热度

    1回答

    我想创建一个嵌套的数据框,类似于在tidyr包中嵌套。但我还没有我的数据在data.frame,所以我不能简单df %>% group_by(thing) %>% nest()我有3个列表,对应于我试图把三个列汇集在一起​​。看下面的例子: library(tidyverse) student = c('bob', 'jane', 'sam') avg_score = c(95, 99, 8