tidyverse

    1热度

    1回答

    我的问题与this one类似,但现在我试图使用一个有多个预测变量的模型,并且我无法弄清楚如何将新数据导入预测函数。 library(dplyr) library(lubridate) library(purrr) library(tidyr) library(broom) set.seed(1234) 首先我创建星期的以次 wks = seq(as.Date("2010-01-0

    1热度

    1回答

    你怎么闪避ggplot2一个ggstance::geom_linerangeh? library(tidyverse) library(ggstance) mtcars %>% group_by(cyl, am) %>% summarize(lo = mpg %>% min, hi = mpg %>% max) %>% ggplot() +

    1热度

    1回答

    我可以选择和安排单列toplists: iris %>% select(Petal.Width, Species) %>% arrange(desc(Petal.Width)) 但我要为整个数据框做到这一点。我用forloop来解决这个问题: features <- colnames(iris) top <- data.frame() for (i in 1:lengt

    0热度

    1回答

    我有以下的(样品)data.frame x <- data.frame(gene = 1:3, Sample1 = 5:7, Sample2 = 4:6, Sample3 = 6:8) 我想改变列名,然后使用数字新标题为x轴的值,我的阴谋 colnames(x) <- c("Gene", "HeLa_0.2", "HeLa_2.0", "HeLa_5.0") x_gather <- x %

    1热度

    2回答

    首次发帖,让我知道是否有任何事情可以改善我的问题。我目前正在尝试使用tidycensus来从人口普查中提取一些数据。为此,我需要知道变量的名称。 创作者指南(https://walkerke.github.io/tidycensus/reference/load_variables.html)建议使用这行代码来创建一个变量列表,你可以过滤: library(tidycensus) v15 <-

    4热度

    4回答

    我有以下列表的列表。它包含两个变量:pair和基因。 pair的包含总是带有两个字符串的向量。变量genes是一个可以包含多个值的向量。 lol <- list(structure(list(pair = c("BoneMarrow", "Pulmonary"), genes = "PRR11"), .Names = c("pair", "genes")), structure(list(pai

    1热度

    1回答

    对于给定日期,我有多个值。我想计算每个给定日期n个最高值的平均值。 如果第一天的数值为(1,2,3),第二天的数值为(4,5,6),我希望第一天的数据为2.5,第二天的数据为5.5。 下面的一些示例数据来说明目前为止的问题和我的想法。 library(tidyverse) #Setting up Dummy Data Dummy_date<-c("2017-01-01","2017-01-01

    0热度

    1回答

    我刚开始在Jupyter笔记本上使用R.似乎有一些问题显示tibble表。 例如, mtcars 一切都正常。 如果mtcars转换为tibble, car<-as_data_frame(mtcars) car 显示完全拧表.... 任何人都知道这是为什么?我需要在jupyter笔记本中设置一些选项吗? 后续问题:如何控制表格输出的行数(不使用head())?有没有我可以设置的笔记本选项

    3热度

    1回答

    我创建了一个简单的数据帧(dput下同)重命名为一个变量名称的列: date ticker value ------------------------------ 2016-06-30 A2M.ASX 0.0686 2016-07-29 A2M.ASX -0.0134 2016-08-31 A2M.ASX -0.0650 2016-09-30 A2M

    1热度

    2回答

    我的问题是我们如何if..else..date中陈述链接? 例如: select.vars <- function(data, price=TRUE){ diamonds %>% {if (price) select(price) else select(carat)} } select.vars(diamonds) 我得到错误: Error in UseMethod("sele