在dplyr中的group_by之后在汇总中使用ifelse
在dplyr中，group_by函数用于按照指定的变量对数据进行分组。然后，我们可以使用summarize函数对每个分组进行聚合操作。在使用ifelse函数之前，我们需要先了解一下dplyr中的group_by和summarize函数的作用和使用方法。
group_by函数用于创建数据分组，可以根据一个或多个变量来对数据进行分组。它将数据根据指定的变量值分成不同的组，这样我们就可以对每个组进行聚合操作。group_by函数的语法如下：
group_by(data, vars)其中，data是要分组的数据框（data frame），vars是一个或多个用来分组的变量名。
summarize函数用于对数据进行聚合操作，可以计算每个分组的统计指标。它可以在group_by函数之后使用，用于对每个组进行汇总。summarize函数的语法如下：
summarize(data, new_var = function(vars))其中，data是要进行汇总的数据框（data frame），new_var是汇总后生成的新变量名，function是用于计算汇总值的函数。
在group_by之后使用ifelse函数，可以根据条件在汇总过程中进行逻辑判断。ifelse函数用于根据条件返回相应的值，它的语法如下：
ifelse(condition, true_value, false_value)其中，condition是一个逻辑条件表达式，true_value和false_value是根据条件为真或假返回的值。
举例来说，假设我们有一个数据框df，其中包含了两个变量A和B。我们想要按照A变量进行分组，并计算每个组中B变量的平均值。如果B的平均值大于5，则返回"高"，否则返回"低"。可以使用以下代码实现：
library(dplyr)
df <- data.frame(A = c("A1", "A1", "A2", "A2", "A3"),
B = c(6, 4, 7, 3, 8))
df_summary <- df %>%
group_by(A) %>%
summarize(mean_B = mean(B),
category = ifelse(mean_B > 5, "高", "低"))上述代码中，我们首先使用group_by函数按照A变量进行分组。然后使用summarize函数计算每个组中B变量的平均值，并将结果保存在mean_B变量中。接着，使用ifelse函数根据mean_B的值判断category的取值，如果mean_B大于5，则返回"高"，否则返回"低"。最后，我们得到了汇总后的数据框df_summary，其中包含了每个分组的平均值和分类信息。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云数据库（TencentDB）：https://cloud.tencent.com/product/cdb
- 腾讯云计算（Tencent Cloud Computing）：https://cloud.tencent.com/product/cvm
- 腾讯云服务器（Tencent Cloud Server）：https://cloud.tencent.com/product/cvm
- 腾讯云音视频处理（Tencent Cloud Audio and Video Processing）：https://cloud.tencent.com/product/avp
- 腾讯云人工智能（Tencent Cloud AI）：https://cloud.tencent.com/product/ai
- 腾讯云物联网（Tencent Cloud IoT）：https://cloud.tencent.com/product/iot
- 腾讯云移动开发（Tencent Cloud Mobile Development）：https://cloud.tencent.com/product/mws
- 腾讯云存储（Tencent Cloud Storage）：https://cloud.tencent.com/product/cos
- 腾讯云区块链（Tencent Cloud Blockchain）：https://cloud.tencent.com/product/baas
- 腾讯云元宇宙（Tencent Cloud Metaverse）：https://cloud.tencent.com/product/ugc
相关·内容
我试图通过添加数字行值和防止第二次出现分组变量的字符值来总结数据帧中的行。
我的数据框架如下：
df <- data.frame(
Season = c('Summer', 'Fall', 'Fall', 'Winter','Spring', 'Spring'),
Number = c(1,2,2,6,7,2),
Character = c('1s', '2s', 's', '1s', '3s', &#
浏览 3提问于2022-11-28得票数 0
回答已采纳
如果存在特定的列，我可以在dplyr中使用‘dplyr’检查它。如果这个短语不存在，我很难评估它的摘要。
下面是我的代码片段：
df <- Prod%>%
group_by(Entity)%>%
select(Entity,`Cum.Oil`,`Cum.Gas`,contains("EUR")%>%
summarise(Oil = mean(`Cum.Oil`), Gas = mean(`Cum.Gas`), EUR=mean(EUR))
如果EUR列不存在，如何忽略汇总表达式中的“EUR”表达式？
浏览 3提问于2022-11-16得票数 2
回答已采纳
以下是我的数据的一个简单版本：
我想为每个组创建一个标志，如果他们在Column1中至少有一个项目。我知道我可以在dplyr中这样做，然后将它与我的原始数据合并，但我想知道是否有更简单的方法。
例如，我可以这样做：
df_column <- df %>% filter(!is.na(Column1)) %>% group_by(Group)%>%
summarize(n=n_distinct(Column1))
然后我可以将其与原始数据合并，并创建一个标志。
浏览 22提问于2020-02-15得票数 1
回答已采纳
我想创建一个新的列，条件是"if Temperatur > 80 show hot in row，否则在行中显示冷“ 这是我的代码： tempcat_aq <- aq %>% group_by(aq$Temp) %>% mutate(TempCat = if(any(aq$Temp > 80) "hot" else "cold")) 我正在使用R中内置的airquality数据帧和dplyr库。 谢谢你帮我的忙。
浏览 1提问于2021-04-30得票数 1
我只是想试一试dplyr的连锁运营商。
使用这个简单的例子：
group_by(mtcars, cyl) %>%
summarise(mean(disp), mean(hp))
我得到的结果是：
# mean(disp) mean(hp)
#1 230.7219 146.6875
出于某种原因，dplyr没有分组，只是汇总了整个向量。我遗漏了什么？
浏览 0提问于2014-11-27得票数 12
回答已采纳
我正在通过销售数据计算一个dplyr::summarize。我做了一个组-by (S，D，Y)，然后在每个组中，计算中间值和5周的平均值.43，然后将它们合并回父df中。变量X是销售。X永远不是NA (即df中任何地方都没有显式的NAs )，但是如果对于S、D、Y和周集没有数据(如in，no sales)，那么df中的值就不会有任何行(假设它意味着该特定参数集的零销售额)。换句话说，将X=0归咎于任何结构上缺失的行(但我希望我不需要melt/cast原始df，以避免膨胀。类似于cast(fill....,add.missing=T)或caret::preProcess())。
关于我的代码成语
浏览 2提问于2014-05-02得票数 4
1回答
我想将来自两个不同变量的数据汇总起来，并对其进行总结。原始的dataframe如下所示：
group animal period zone day cum_time_sec
<chr> <chr> <chr> <chr> <dbl> <dbl>
1 chr chr1 q1 eating 1 3.22
2 chr chr1 q1 interzone 1 2.14
3 chr chr1
浏览 8提问于2022-04-25得票数 0
回答已采纳
require(plyr)
require(dplyr)
set.seed(8)
df <- data.frame(
group = sample(c("A","B"), 10, replace=T),
subgroup = sample(c("a", "b", "c"),10, replace=T),
value = runif(10, -1,1)
)
df %>% arrange(group,subgroup)
给予：
group subgroup va
浏览 0提问于2015-01-16得票数 2
回答已采纳
在编写标记文件时，我在R中引用组by语句的输出存在问题。当我引用group_by输出的变量名和汇总语句时，我会得到一个错误，说明变量不存在。
下面是在run中运行但在run中失败的代码版本。
DF1 <- data.frame(name = c("1", "1", "2", "2", "3", "1" ),
s_id = c("ab", "ab", "cd", "ab", " bc",
浏览 2提问于2018-11-11得票数 0
回答已采纳
1回答
我有以下DF (这是一个子集)：
structure(list(First.Name = c(6003L, 6003L, 6003L, 6003L, 6003L,
6004L, 6004L, 6004L, 6004L, 6001L, 6001L, 6001L, 6001L, 6002L,
6002L, 6002L, 6002L, 6002L, 6003L, 6003L, 6003L, 6003L, 6004L,
6004L, 6004L), Intervention = c("PRE", "PRE", "PRE", "PRE"
浏览 13提问于2019-11-20得票数 1
回答已采纳
2回答
卸载后的数据帧具有多个行，这些行的na值可以汇总到一行中。所有文本/字符数据。示例：
link feature-1 feature-2 feature-3
link_1 a. NA NA
link_1. NA NA b
link_1. NA. c NA
link2 NA. a NA
link_2 NA NA d
link_2 x NA NA
浏览 0提问于2021-04-08得票数 0
我有以下示例数据表
steps.dt = data.table(steps=rep(0:2, each=3),
date=as.factor(rep(c("10/2/2012", "10/3/2012", "10/4/2012"), each = 3)), interval = as.factor(rep(c(0,5,10), each = 3)))
插入几个NAs
steps.dt[c(2,5,8),"steps"]=NA
这张桌子现在看起来像这样
steps date interval
1: 0 10
浏览 3提问于2017-06-05得票数 1
回答已采纳
我有一个包含三个“主”-groups (x: 1、2、3)、三个主组内的三个组(v: 2、3或1)以及主组内的一些事件(0和1 in y)的数据文件：
x <- c(1, 1, 1, 2, 2, 3, 3, 3, 3)
v <- c(2, 3, 3, 2, 2, 1, 1, 2, 2)
y <- c(0, 0, 1, 0, 0, 0, 0, 0, 1)
df <- data.frame(x, v, y)
df
> df
x v y
1 1 2 0
2 1 3 0
3 1 3 1
4 2 2 0
5 2 2 0
6 3 1 0
7 3 1 0
8 3 2 0
浏览 0提问于2018-10-28得票数 1
回答已采纳
如果第一行中已经有安娜，我希望将同一列中的下一行i+1设置为NA，然后按组执行。以下是我的尝试：
dfeg <- tibble(id = c(rep("A", 5), rep("B", 5)),
x = c(1, 2, NA, NA, 3, 5, 6, NA, NA, 7))
setNextrowtoNA <- function(x){
for (j in 1:length(x)){
if(is.na(x[j])){x[j+1] <- NA}
}
}
dfeg <
浏览 2提问于2022-02-03得票数 0
回答已采纳
2回答
我有一个数据，我想总结一下，使用dplyr。在dataframe中有多个因素，我想报告每组汇总的每个因素级别的计数。
是否有一种方法可以使用dplyr进行以下操作，而不必在汇总语句中指定每个因素级别。
图书馆(Dplyr)
set.seed(123)
s <- rbinom(100,1,0.5)
s <- factor(s,0:1,c('M','F'))
a <- sample(1:4,100,TRUE)
a <- factor(a,1:4,c('oldest','old','young'
浏览 1提问于2016-06-14得票数 1
回答已采纳
使用下面提供的示例数据:对于每种机构类型("a“和"b")，如果同一年有一个包含fac == == "yes”的行，则我希望删除带有fac == "no“的行。然后，我想按年对这些数值进行汇总。然而，我无法弄清楚如何删除正确的“不”-rows。下面是我在给答案的基础上做的几次尝试。
set.seed(123)
ext <- tibble(
institution = c(rep("a", 7), rep("b", 7)),
year = rep(c("2005", "2005"
浏览 2提问于2020-11-22得票数 3
回答已采纳
我有以下数据框架df，其中有以下列：
df <-
REP METRIC BE
1 A 1
2 A 0
3 A 1
1 B 1
2 B 1
3 B 1
1 C 0
2 C 1
3 C 1
我想按REP对数据进行汇总，以便对于每个唯一的REP，如果BE是Metric A和B的1，那么添加一个新的列BEBOTH和1，否则就是0 (也就是说，如果它们中的任何一个为零，那么BEBOTH为零)。
产出应是：
REP BEB
浏览 5提问于2016-04-19得票数 2
回答已采纳
1回答
我刚刚从ddply开始，发现它非常有用。我想总结一个数据框架，并根据汇总的列是否具有特定的值，在最终输出中去掉一些行。这与SQL中的HAVING和GROUP BY类似。下面是一个例子：
input = data.frame(id= c( 1, 1, 2, 2, 3, 3),
metric= c(30,50,70,90,40,1050),
badness=c( 1, 5, 7, 3, 3, 99))
intermediateoutput = ddply(input, ~ id, summarize,
浏览 0提问于2014-07-16得票数 6
回答已采纳
1回答
我有下面的data.table
dtable <- data.table(column1 = c(1, 2, 3, 5, 6, 7, 8),
column2 = c(1, 1, 1, 5, 5, 6, 8),
column3 = c(7, 8, 9, 0, 9, 2, 3))
我想做一些类似于以下功能的事情，但是在一个参数化的函数中：
dtable %>%
dplyr::group_by(column1) %>%
dplyr::summarise(Result = ifelse(c
浏览 5提问于2017-04-10得票数 2
回答已采纳
我有这样的df：
data <- tribble(~id, ~othervar, ~it_1, ~it_2, ~it_3, ~it_4, ~it_5, ~it_6,
"k01", "lum", "a", "b", "c", "a", NA, NA,
"k01", "lum", NA, NA, NA, NA, "a", "d",
"k02&#
浏览 4提问于2022-11-22得票数 2
2回答
我想知道唯一值的数目，2，3或更多的值。
x
name var
1 a abc1
2 b abc1
3 c abc2
4 d abc2
5 e abc2
6 f accd1
7 g baac1
y <- data.frame(table(x$var))
y
Var1 Freq
1 abc1 2
2 abc2 3
3 accd1 1
4 baac1 1
如果使用table()，我可以看到Var1有多少。但是我想知道的是..。有多少独特的价值。(及2、3或以上)
就像这样。
unique val
浏览 0提问于2018-02-09得票数 0
3回答
使用dplyr，我将为两个类别生成一个简单的汇总表：
# Data
data("mtcars")
# Lib
require(dplyr)
# Summary
mt_sum <- mtcars %>%
group_by(am, gear) %>%
summarise(n = n()) %>%
spread(key = am, value = n)
它产生了预期的结果：
Source: local data frame [3 x 3]
gear 0 1
(dbl) (int) (int)
1 3 15
浏览 3提问于2015-12-03得票数 4
回答已采纳
我想比较分组(按ID分组)数据集中x1和x2的第一个值。如果x1的第一个分组值大于x2的第一个分组值，我会将ID指定为1，否则为0。让我在示例中向您展示这一点。你可以在下面看到我的输入变量
dt<-data.frame(ID=c(100, 100, 101, 101, 101), x1=c(1200, 1600, 1350, 1400, 1500),
x2=c(1100, 1410, 1900, 1300, 1100))
由于1200 > 1100，我将1分配给ID 100，而由于1350 < 1900，我将0分配给ID 10
浏览 2提问于2021-05-31得票数 0
3回答
R中总结柱的相对频率
、、、、
我需要得到R中一个汇总列的相对频率，我使用了dplyr的汇总来查找每个分组行的总数，如下所示：
data %>%
group_by(x) %>%
summarise(total = sum(dollars))
x total
<chr> <dbl>
1 expense 1 3600
2 expense 2 2150
3 expense 3 2000
但是，现在我需要为每一行
浏览 10提问于2021-12-29得票数 2
回答已采纳
2回答
我有一个数据框架与个人和他们被检测到的网站。
ID Location
5994 Greshornish
5994 Snizort
6017 Greshornish
6018 Greshornish
6020 Greshornish
6020 Snizort
6021 Greshornish
46507 Greshornish
46508 Snizort
46511 Greshornish
46512 Greshornish
46512 Snizort
我想数一数在一个站点或两个站点检测到的个人数量。例
浏览 2提问于2022-10-12得票数 0
回答已采纳
我已经使用R的“汇总”功能创建了一个汇总数据框架，包括两个因素-“公司大小”和“案例状态”-以及“公司大小”和“案例状态”的每个组合的记录数(n)。公司的大小有三个级别，案例状态有四个级别，所以我在这个汇总的数据框中总共有12行。下面是汇总数据框的脚本(包括前面的'group by‘函数)：
df <- group_by(df, df$Firm.Size, df$`Case Status`)
summ_firm <- summarize(df, num_records = n())
我想在汇总数据框架中创建一个新列，该列提供单个行的记录数(即给定的“公司大小”和“案例状态”
浏览 0提问于2018-02-28得票数 0
我正在尝试对数据帧进行逐行操作(逐组)。当我只为一个组单独运行这个函数时，它运行的非常好。但是，当我将函数放入ddply中以便为所有组运行它时，它会抛出一个错误--参数的长度为零。
在数据帧“test”上单独运行时的函数：
for (i in 1:(nrow(test) - 5)) {
if (i <= 5) {
test[i, "MPPALERT"] <- 0
}
FIRSTMPP <- test[i, "TAGMPPSEARCHCOUNT"]
LASTMPP <- test[i+5, "TA
浏览 0提问于2016-02-29得票数 2
回答已采纳
我有以下数据集；
df <- matrix(data = c("G1", "March", 98.97291,
"G1", "April", 95.99673,
"G2", "January", 97.46496,
"G2", "February", 100.56501,
"G2
浏览 5提问于2022-09-29得票数 2
回答已采纳
当我使用下面的函数时，汇总的结果不是分组，而是混合在一起。我该怎么解决它呢？ dep %>%
group_by(ORIGIN) %>%
summarise(ontime_dep = sum(dep$DEP_TYPE == "ontime", na.rm = T))
浏览 13提问于2021-04-09得票数 2
2回答
我有一个data.frame，其中包含客户名称、年份和每年的几个收入数字。
df <- data.frame(client = rep(c("Client A","Client B", "Client C"),3),
year = rep(c(2014,2013,2012), each=3),
rev = rep(c(10,20,30),3)
)
我想最终得到一个按客户和年度汇总收入的data.frame。然后，我想按年对data.fra
浏览 6提问于2014-10-24得票数 32
回答已采纳
1回答
我想使用一个if data语句根据另一列中的数据在我的dataframe中创建一个新列。也就是说，我想在一个群体中做一个区分。因此，例如，在一个ID为xyz的家庭中，有两个具有自己ID的兄弟姐妹，但具有相同的家庭ID的是最大的人(根据年份)，谓词“第一胎”和另一个人“不是第一胎”。那么，应该如下所示：
Thx用于任何编码帮助
浏览 4提问于2022-09-17得票数 -1
1回答
我试图在R中填充一个blanc列，但是每当我运行以下代码时，什么都不会发生：
FF5_class <-
FF5_class %>%
group_by(permno) %>%
arrange(date) %>%
fill(Hold, .direction = "down") %>%
ungroup()
我的数据集名为: FF5_class
我已经用以下代码创建了“Hold”列：
FF5_class$Hold <- ifelse(FF5_class$Month == "06", FF5_class$Portf
浏览 3提问于2021-03-10得票数 0
回答已采纳
我有一个超过5000个组ID的df。每组包含一个或多个观察值(测量值)。第二列指示测量是否已完成的状态。在大多数情况下，一个组内的所有测量应该包含相同的状态，但情况并不总是如此(例如，示例代码中的组B)。在某些情况下，状态可能会丢失，并将被过滤。
tibble(group_id=factor(c("A", "A", "A","B","B","B","C")),
status=factor(c("complete","complete",
浏览 1提问于2021-10-12得票数 3
1回答
因此，我有一个表，其中每一行都表示特定事件中的给定用户。每行包含两种类型的信息:此类事件的结果以及特定用户的数据。多个用户可以参与同一事件。
为了清楚起见，下面是这样一个表的简化示例：
EventID Date Revenue Time(s) UserID X Y Z
1 1/1/2017 $10 120 1 3 2 2
1 1/1/2017 $15 150 2 2 1 2
2 2/1/2017
浏览 1提问于2017-03-10得票数 0
回答已采纳
2回答
我有一个DF，有一个实验的行为数据(情绪选通任务)，试验要么是一致的，要么是相同的。示例：
ID |trial|Congruency |CorrectResponse|responseTime
1 | 1 | Congruent | 1 | 450
1 | 2 |InCongruent| 0 | 465
1 | 3 | Congruent | 1 | 567
1 | 4 | Congruent | 1 | 498
2 | 1 |InCongruent| 1
浏览 5提问于2020-07-06得票数 0
回答已采纳
1回答
我试图为每个个人身份证在第1期收入低于450.000时创建一个虚拟模型。我尝试过的，但没有成功：
data$ABOVE <- ifelse(data$INCOME >= 450000, 0, 1)
该代码的问题在于，它只取决于当前观察中的收入是高于450000还是低于450000。我需要它依赖于每个ID的时间1，以防在整个数据集中的某些个人的收入低于一个观察，而在另一个观察下。
这是我的数据：
structure(list(ID = c(1, 1, 1, 2, 2, 2), TIME = c(1, 2, 3, 1,
2, 3), GROUP = c(2, 2, 2, 1, 1,
浏览 3提问于2022-10-11得票数 0
我有一个数据框架： ID <- c(1,1,2,2,2,2,3,3,3,3,3,4,4,4)
Eval <- c(TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, TRUE, TRUE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE)
df <- data.frame(ID,Eval) 只要Eval per ID中有一个FALSE，就应该有一列，比如x，表示TRUE。如何创建此列？ 输出应为： ID x
1 FALSE
2 TRUE
3 TRUE
4 FALSE
浏览 21提问于2021-11-19得票数 3
回答已采纳
2回答
我有一个spark数据框架(在R和sparklyr的上下文中)，它有三列: id、x和y。
df <- df %>% group_by(id) %>% summarize(x=sum(x),y=sum(y))
现在假设我现在接收到一个列数可变的数据帧。除了id之外，所有其他列都是双精度的，我需要像以前一样对它们进行总结。当然，我可以得到列名，迭代汇总每个列名并连接结果，但它看起来很难看。有没有一种简单的方法呢？
浏览 3提问于2018-05-17得票数 0
1回答
我觉得dplyr很棒。不过，我最近更新了包，似乎不再按组汇总。类似于升级前按组汇总的以下代码：
iris_tdt <- tbl_dt(iris)
iris_tdt %.% group_by(Species) %.% summarise(avg_petal_width = mean(Petal.Width))
avg_petal_width
1 1.199333
这用于输出一个包含物种和avg_petal_width的表。现在，似乎删除了物种列，并将avg_petal_width聚合为单个值。group_by似乎在工作，所以我猜这是总结的一个问题。
grp <-
浏览 0提问于2014-03-11得票数 2
回答已采纳
1回答
我需要将字段“步骤”中缺失的值替换为在特定一天内计算的“步骤”的中位数(组按“日期”计算)，并删除NA值。我已经引用了这个，但是我的NA值没有被替换。有人能帮我找出我哪里出了问题吗？我更喜欢使用基包/数据表/plyr。数据集看起来大约。像这样：-
steps date interval
1: NA 2012-10-01 0
2: NA 2012-10-01 5
3: NA 2012-10-01 10
4: NA 2012-10-01 15
5: N
浏览 5提问于2015-05-16得票数 8
回答已采纳
我对R相对来说是个新手，如果问题已经被问到了，我很抱歉，但是很明显，我要么无法理解答案，要么找不到正确的关键词！
我的问题是:我有一个类似于此的数据集：
Name Year Corg
1 Bois 17 2001 1.7
2 Bois 17 2007 2.1
3 Bois 17 2014 1.9
4 8-Toume 2000 1.7
5 8-Toume 2015 1.4
6 7-Richelien 2 2004 1.1
7 7-Richelien 2 20
浏览 4提问于2019-09-19得票数 2
回答已采纳
因此，我有一个学生数据集，我目前正在清理，我已经取得了数据框架的一个子集，并希望根据与特定专业关联的平均工资和非缺失值的实习数量来填充这个子集的工资列中的NAs。 所以如果我有： subset(work_dat, (is.na(Employed) & outcome_table=="Employed - Full-time"), select=major, int_numb, salary)
Major Int_numb salary
<fctr> <dbl> <dbl>
Bi
浏览 4提问于2019-03-16得票数 0
我的测试数据如下：
id<-c("aaa","bbb","aaa")
start<-as.Date (c("2016-01-23", "2016-02-24", "2016-01-23", "2016-10-23", "2016-08-24", "2016-04-23"))
duration<-as.numeric(3,3,3,6,3,3)
value<-as.numeric(20,100,20, 100,200,50)
df
浏览 4提问于2016-08-05得票数 0
回答已采纳
2回答
我想从dataframe df创建一个汇总报告，其中每一行都是基于列B的列A的累积和(其中C是另一个id列)。以下是数据和输出：
set.seed(154)
df <- data.frame(B = append(append(rep(1,10),rep(2,10)),rep(3,10)),
C = rep(1:10,3),
A = sample(0:10,30,replace=T)) %>% arrange(B,C)
输出：
我写的是
df %>% arrange(B) %>% group_by
浏览 19提问于2019-07-23得票数 1
回答已采纳
1回答
我想根据财政年度从季度到年度汇总一些数据。因此，这一年将涵盖9月至6月。我可以设法在一年中汇总，但它是日历年汇总。下面是一个示例：
Date <- seq(as.Date("1999-03-01"), as.Date("2002-12-01"), by = "quarter")
df <- data.frame(Date, value = 1:length(Date))
df %>%
mutate(Year = year(Date),
Quarter = quarter(Date)) %>%
浏览 19提问于2017-08-03得票数 0
回答已采纳
2回答
我有一些行NA的计数练习。
下面是一个包含cat和id变量的示例数据集。
df <- data.frame(cat=c("A","A","A","B","B","C","C","C","C"),
id = c(11,12,13,NA,NA,21,21,23,24))
> df
cat id
1 A 11
2 A 12
3 A 13
4 B NA
5 B NA
6 C 21
7
浏览 15提问于2022-01-24得票数 3
回答已采纳
我有这些数据：
tribble(
~ranges, ~last,
0, NA,
1, NA,
1, NA,
1, NA,
1, NA,
2, NA,
2, NA,
2, NA,
3, NA,
3, NA
)
我只想在last列的最后一个条目的行索引处填充ranges列。也就是说，它应该是这样的：
tribble(
~ranges, ~last,
0, 0,
1, NA,
1,
浏览 2提问于2022-02-09得票数 1
回答已采纳
有没有什么方法可以应用条件group_by？例如(顺便说一下，代码不能工作，但它只是为了显示虹膜数据集，这样你就能理解要点了)： iris$Sepal.Width.r <- round(iris$Sepal.Width)
for(i in 1:2){
test <- iris %>%
ifelse(i == 1, group_by(Species), group_by(Sepal.Width.r)) %>% #****
summarise(avgLWdiff = (mean(Petal.Length) - mean(Petal.Width)))
prin
浏览 28提问于2021-07-25得票数 2
回答已采纳
我有一个看起来像这样的data.frame： GROUP | YEAR | VAL
A | 2007 | 10
A | 2007 | 11
A | 2007 | NA
A | 2008 | 13
B | 2006 | NA
B | 2006 | 5
B | 2006 | 6 因此，每一组可能有不同的年份。我想用相应年份中相应组的平均值替换这些NAs。例如，对于行3中的NA，它将被2007年A组的平均值所取代。 我可以使用for循环来做到这一点，但不幸的是，我的教授讨厌" for“循
浏览 16提问于2019-10-16得票数 1
回答已采纳
我通常有一个有很多character类型的列(在20到30之间)和只有3-4个类型的numeric列的tibble。 对数字列进行分组和汇总非常快，但我在确保每个分组var值具有唯一值的同时汇总字符列的方法总体上相当慢。 我只是想知道有没有比使用paste()更快的方法。 library(magrittr)
make_unique <- function(x, sep = "-") {
ifelse(length(x_unique <- unique(x)) == 1, x_unique,
paste(sort(x_unique), collapse
浏览 24提问于2019-04-05得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
云直播活动推荐
腾讯云开发者
