如何在R中的函数中使用group_by
在R中，可以使用dplyr包中的group_by函数来对数据进行分组操作。group_by函数可以根据一个或多个变量对数据进行分组，并为每个组创建一个独立的数据子集。
使用group_by函数的基本语法如下：
grouped_data <- group_by(data, var1, var2, ...)其中，data是要进行分组的数据框或数据集，var1、var2等是要进行分组的变量。
使用group_by函数后，可以对分组后的数据进行各种操作，如计算统计量、筛选数据等。下面是一些常见的group_by函数的应用场景和示例：
- 计算每个组的均值：使用summarize函数结合group_by函数可以计算每个组的均值。
library(dplyr)
# 创建示例数据集
data <- data.frame(group = rep(c("A", "B"), each = 5),
value = 1:10)
# 对数据进行分组，并计算每个组的均值
grouped_data <- group_by(data, group)
mean_value <- summarize(grouped_data, mean(value))- 筛选出满足条件的组：可以使用filter函数结合group_by函数来筛选出满足条件的组。
library(dplyr)
# 创建示例数据集
data <- data.frame(group = rep(c("A", "B"), each = 5),
value = 1:10)
# 对数据进行分组，并筛选出均值大于5的组
grouped_data <- group_by(data, group)
filtered_data <- filter(grouped_data, mean(value) > 5)- 对每个组应用自定义函数：可以使用do函数结合group_by函数来对每个组应用自定义函数。
library(dplyr)
# 创建示例数据集
data <- data.frame(group = rep(c("A", "B"), each = 5),
value = 1:10)
# 自定义函数，计算每个组的标准差
calculate_sd <- function(data) {
sd(data$value)
}
# 对数据进行分组，并应用自定义函数
grouped_data <- group_by(data, group)
result <- do(grouped_data, calculate_sd(.))以上是在R中使用group_by函数的一些常见应用场景和示例。如果你想了解更多关于R中的group_by函数的详细信息，可以参考腾讯云的数据分析产品TencentDB for PostgreSQL，它提供了强大的数据分析功能，包括对数据进行分组、聚合等操作。
TencentDB for PostgreSQL产品介绍链接地址：https://cloud.tencent.com/product/tencentdb-postgresql
相关·内容
有没有什么方法可以应用条件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
回答已采纳
我目前正在从事一个R项目，我正在定义一个函数，该函数将在特定的数据集上执行文本挖掘。
其基本思想是有一个函数来计算所挖掘的文本的数量，并将该数字与每个文本的分数相乘。
到目前为止，我已经用以下方法定义了这个函数：
function_a <- function(data, dict) {
data %>% inner_join(dict) %>% count(word) %>% n*score
}
我试图通过将表象数与其权重相乘来计算分数，但我得到了一个错误：
Error in eval(rhs, env, env) : object 'score'
浏览 1提问于2018-11-06得票数 0
回答已采纳
我在R中使用dplyr对数据进行分组，我希望在每个组('A')中，在最后一次出现的观测('B')等于或大于1 (1，2，3或4)之后找到‘日期’。换句话说，1/2/3/4的“日期”变成了0。
简单地找到第一次出现0的日期就不能工作，因为在某些组中，1/2/3/4切换到0，然后再次返回，并且没有给出我想要的结果。
我希望在一个新的专栏('date.after')中给出每个组的“日期”。
例如，给定以下按A分组的数据样本(这已被简化，我的数据实际上按3个变量分组)：
A B date
a 2 1
a 2 2
a 1 5
a 0 8
浏览 1提问于2016-02-26得票数 2
回答已采纳
1回答
我想知道是否有可能在R中从excel电子表格的行中随机选择特定的类别。
例如，以下是示例数据
我只想随机选择一种类型的"Station“行(例如，只选择”LC04“行，但这是随机确定的)。有没有办法在R中做到这一点？我有一个很大的数据集，希望将选择随机化~100次，这样我就可以使用每个随机结果进行额外的分析。
谢谢!
浏览 3提问于2021-09-02得票数 1
我有一个大约有2500行的data.frame mydf。这些行对应于第1列mydf$V1中的69个对象类，我想计算一下每个对象类有多少行。我可以通过以下命令获得这些类的因子：
objectclasses = unique(factor(mydf$V1, exclude="1"));
计算每个对象类的行数的简洁R方法是什么？如果这是任何其他语言，我会使用循环遍历数组并保持计数，但我是R编程新手，正在尝试利用R的矢量化操作。
浏览 110提问于2014-09-30得票数 45
回答已采纳
我进入了编程语言R，我想知道dplyr::group_by()和group_by()之间的区别?这个操作符“：”做什么？
谢谢!
浏览 9提问于2022-05-01得票数 0
2回答
我很难复制中的示例。
这是我的代码和会话信息。今天我花了太多的时间去寻找错误的线索，并重新安装软件包。任何帮助都是非常感谢的。
library(dplyr)
df <- tibble(
g1 = c(1, 1, 2, 2, 2),
g2 = c(1, 2, 1, 2, 1),
a = sample(5),
b = sample(5)
)
my_summarise <- function(df, group_by) {
group_by <- enquo(group_by)
print(group_by)
df %>%
group_by
浏览 0提问于2017-10-03得票数 0
回答已采纳
我在R中有一个音乐数据，我必须将数据按类型分组，计算每个流派中的流总数，并对结果进行排序，首先显示最受欢迎的类型。
我已经编写了这段代码，但是我觉得在对结果进行排序以显示最流行的类型时，我重复了一些步骤。你能帮我简化一下这段代码吗？
谢谢!
#Group the data by genre and calculate the total number of streams
genre <- aggregate(music_data$streams, by = list(music_data$genre), FUN = sum)
#Change the name of the colum
浏览 5提问于2022-10-16得票数 1
回答已采纳
开始创建包时，我构建了几个函数，然后运行devtools::check()，以确保我已走上正轨。下面我复制devtools::check()命令的整个输出。有两个音符让我吃惊。我希望通过清理这两件事，其他的事情会变得更容易解决，所以我从它们开始。我不是试图解决所有的问题，从检查，只是试图理解这两个。第一个问题是：
描述文件中没有提到文件许可证。
另一个是后来者
检查R代码是否可能出现问题(3.7s)
其中有许多消息“没有可见的全局函数定义”，尽管这些函数在描述文件中导入的包中。
下面是描述文件。整个可复制的代码可以在中找到。之后是devtools::check命令的输出。
Pa
浏览 0提问于2019-05-12得票数 10
我有一个有4列的data.frame DT_new：
毕业(日期格式)
工作(日期格式)
已婚(日期格式)
Jumlah (双格式)
示例：
Graduated Work Married Jumlah
2015-05-01 2015-05-02 2015-05-03 20
NA 2015-05-02 2015-05-03 20
NA NA 2015-05-03 20
NA 2015-05-02
浏览 7提问于2015-07-29得票数 5
回答已采纳
我正在与R光泽进行一些探索性的数据分析。我有两个复选框输入，其中只包含用户选择的选项。第一个复选框输入仅包含分类变量；第二个复选框仅包含数字变量。接下来，我对这两种选择应用groupby：
var1 <- input$variable1 # Checkbox with categorical variables
var2 <- input$variable2 # Checkbox with numerical variables
v$data <- dataset %>%
group_by_(var1) %>%
summarize_(
浏览 3提问于2015-12-28得票数 45
回答已采纳
我想取一个tibble中单元格的值，并在重命名列时使用这个值。
例如，假设在mtcars dataframe中，我希望将mpg列第一行中的值连接到disp列的列名。
我最初的想法是：
mtcars %>%
select(mpg, cyl, disp) %>%
setNames(c('miles', 'cylinders', paste0('disp_', mpg[1])))
然而，这是行不通的。有什么帮助吗？
浏览 2提问于2018-06-20得票数 1
回答已采纳
2回答
我正在使用一个国家的每日死亡人数数据库，因此我需要创建一个数据库，其中包含按日、月和州划分的每日死亡人数的汇总数据。我的数据库(def_2020)是这样的：
|--------------|------------|-------|
| State | Month | Day |
|--------------|------------|-------|
| state1 | jan | 1 |
|--------------|------------|-------|
| state1 | jan |
浏览 20提问于2020-11-17得票数 0
回答已采纳
我有一个叫做Categories的因子向量，有47个级别
Categories = as.factor(sort(make.unique(rep(letters, length.out = 47), sep='')))
[1] a a1 b b1 c c1 d d1 e e1 f f1 g g1 h h1 i i1 j j1 k k1 l l1 m m1 n n1 o o1 p p1 q q1 r r1 s s1 t
[40] t1 u u1 v w x y z
47 Levels: a a1 b b1 c c1 d d1
浏览 21提问于2017-08-30得票数 1
回答已采纳
在R中，我有一个data.frame data，其中head(data)给出了
user action information
12 2012-01-01 12323
11 2014-03-02 24445
12 2012-02-05 32234
....
我想创建一个新的数据集，它只包含user和它们的诞生(即它们的first操作)。例如，对于user 12，它是2012-01-01。
在sparkR中，我知道如何做到这一点，但我想知道如何在R.，在sparkR中，我只是这样做
new=groupBy(data, data$user)
new_data=
浏览 1提问于2016-08-30得票数 1
回答已采纳
我在R中有一个数据帧x ID Name Code
1 John aa1
1 Sue aa2
1 Mike aa2
1 Karl aa3
1 Lucy aa1 我想在此数据帧中添加一个额外的列，用于计算每个Code值出现的次数： ID Name Code Code_frequency
1 John aa1 1
1 Sue aa2 2
1 Mike aa2 2
1 Karl aa3 1
1 Lucy aa4 1 我尝试过使用mutate和count的各种组合，但收到的错误消息表明我使用了错误的数据类型：no applicable method for '
浏览 32提问于2021-09-28得票数 0
回答已采纳
嗨，我想知道如何将x轴拆分为R中的十进制，并制作ggplot？
我目前有年龄范围数据和NO2污染数据。这两个数据集共享名为ward的相同地理参考。我希望将我的人口统计数据绘制成相同数量的分位数(总共298个)。
我在R中尝试了分位数回归，其中我使用了以下内容：
library(SparseM)
library(quantreg)
mydata<- read.csv("M:/Desktop10/Test2.csv")
attach(mydata)
Y <- cbind(NO2.value)
X <- cbind(age.0.to.4, age..
浏览 16提问于2018-01-06得票数 0
回答已采纳
1回答
在两列上分组并使用R计数不同的值
、、、、
使用R，我试图获得两个聚合函数max和count distinct，并对数据帧中的值进行分组，并根据其他两列对它们进行分组。
A = c('A', 'A', 'A', 'B', 'B', 'B')
B = c('R1', 'R2', 'R1', 'R1', 'R2', 'R1')
C = c(11, 2, 8, 11, 11, 17)
d = data.frame (A, B, C)
sqldf(
浏览 2提问于2018-11-30得票数 2
回答已采纳
1回答
R累积群
、
我在R中有以下代码
set.seed(12048)
name <- sample(letters[1:3], 10, replace=T)
df <- data.frame(name, stringsAsFactors = F)
df$score <- sample(0:1, nrow(df), replace=T)
df$rank <- as.numeric(ave(df$name, df$name, FUN=seq_along))
v <- by(df$score, df$name, cumsum)
这将产生下表
name score rank
1
浏览 1提问于2017-05-01得票数 0
回答已采纳
我在R中有一个数据集，其中包括6个定量变量和另一个二进制变量。我的目标是，对于每一个转位变量，创建一个方格图来比较这个变量在二进制变量的两个级别上的值，我希望使用ggplot将这6幅图像放到R中的一个数字中。
考虑下面的例子来展示我正在说的话。到目前为止，我已经知道如何使用R中默认的“box图”函数来解决这个问题：
X = data.frame(a = c(rep("T", 5), rep("F", 5)),
b = rnorm(10),
c = runif(10))
par(mfrow = c(
浏览 0提问于2019-01-22得票数 1
回答已采纳
我是新的R和工作的棒球数据从后页。我正在尝试从我的目录下载多个文件。例如，这个ll对象包含两个TXT文件名"GL2001.TXT“和"GL2002.TXT”。这是剧本。这在我的控制台上起作用了。
ll = list.files(pattern = "*.TXT")
ll
mycols <- read_csv("game_log_header.csv") %>%
names()
ll_data <- lapply(ll, read_delim,
col_names
浏览 2提问于2021-05-21得票数 2
回答已采纳
使用此，R(Ggplot2)中的以下代码：
vars <- read.csv(file="c:/R/rr.csv", header=TRUE, sep=",")
str(vars)
ggplot(vars , aes(x=B, y=ï..A, group = C, fill = C))+
geom_bar(stat="identity", show.legend = F, position=position_stack(0.5)) +
geom_text(aes(label=ï..A), position = position_stac
浏览 6提问于2020-03-20得票数 0
回答已采纳
1回答
我混淆了我在R中做的一个练习，我只是一个R的初学者
指令是使用dplyr操作数据，以便为每个DHB、每个Age和每个Date获得比例免疫(即免疫除以合格)。保存结果，以便您可以将其用于其余的问题。最后，您应该得到一个包含DHB__、Date__、Age和Proportion变量的数据框架，其中包含4834个观测结果。
但我不知道该怎么做，但这是我试过的
```{r}
vacc %>%变异(比例=免疫/DHB(Vacc))
%>%选择(DHB，日期，年龄，比例)
但它给了我这个错误
Error: Problem with `mutate()` input `Proportion`.
浏览 1提问于2020-08-25得票数 0
回答已采纳
4回答
我想标准化R中的变量，我知道多种方法，如何做到这一点。然而，我非常喜欢使用以下方法：
library(tidyverse)
df <- mtcars
df %>%
gather() %>%
group_by(key) %>%
mutate(value = value - mean(value)) %>%
ungroup() %>%
pivot_wider(names_from = key, values_from = value)
由于某些原因，这种方法无法工作，因为我无法将数据返回到原始格式。因此，我想征求意见。
浏览 2提问于2020-07-03得票数 8
回答已采纳
1回答
在紧接下面运行R/dplyr代码时，我得到列reSeq中最后一个单元格的错误输出。代码在列reSeq的最后一个单元格中产生一个值8，当它通过代码中的lag()函数生成一个7时，使用lag()函数有什么问题？还可以看到底部的图片，它能更好地解释我想做的事情。
Element Group eleCnt reSeq
<chr> <dbl> <int> <int>
1 R 0 1 1
2 R 0 2 2
3 X 0 1
浏览 1提问于2022-09-14得票数 0
回答已采纳
2回答
我正在研究如何在网上使用R函数，但仍然很难弄清楚。请帮帮忙。
我的初始代码如下：
whatever %>%
group_by(a) %>%
summarize(count=n()) %>%
collect() %>%
ggplot(aes(x=a, y=count)) +
geom_point()
我想重复多次，因为还有其他列要检查相同的函数。
所以我写到：
point_dist <- function(dta, vari) {
dta %>%
group_by(vari) %>%
summarize(count=n()) %>%
collect
浏览 1提问于2019-07-16得票数 1
回答已采纳
我一直在使用左连接，我想知道是否有可能在下面的查询中获得到目前为止所有用户的评分总和。下面让我得到的信息，如果登录的用户已经评级或没有，但我想显示总评分从其他用户也。
$query = mysql_query("
SELECT com.comment, com.comment_id, r.rate_up, r.rate_down
FROM comments com
LEFT JOIN ratings r
ON com.comment_id = r.comment_id
AND r.user_id = '" . $user_id_var . "'
WHER
浏览 0提问于2012-05-04得票数 2
首先，我知道这个标题听起来非常奇怪，但我就是找不到更好的措辞，这可能是为什么我在之前提出的问题中找不到它的原因。
我想知道的是我如何分析，比如一个自变量和一个因变量之间的相关性，但是首先看到的是男性之间的相关性，然后是女性之间的相关性(当然，我在数据框架中有性别作为一列。
当然，这并不限于相关性。我想知道，一般来说，最好的(如果可能的话也是最简单的)方法是什么。
非常感谢
浏览 0提问于2015-01-29得票数 0
Dplyr0.7的发布包含一个用dplyr编程的。我仔细阅读了本文档，并试图了解它将如何影响我对dplyr的使用。
下面是我在使用dplyr构建报告和聚合函数时使用的一个常见成语：
my_report <- function(data, grouping_vars) {
data %>%
group_by_(.dots=grouping_vars) %>%
summarize(x_mean=mean(x), x_median=median(x), ...)
}
在这里，grouping_vars是字符串的向量。
我喜欢这个成语，因为我可以从其他地方传入字符
浏览 9提问于2017-04-14得票数 24
回答已采纳
3回答
我在R中有一个大表，需要计数其中一个列中值的出现情况，并将计数放在它自己的列中。没有聚集。
所以如果我有：
var
23456
34567
45678
23456
etc
我的产出应该是：
var count
23456 2
34567 1
45678 1
23456 2
etc
我确实读过所有的线程，但似乎无法找到一种不进行聚合的方法。我需要的是相当于excel的count(A1:A4;A1)。
浏览 4提问于2017-05-22得票数 1
回答已采纳
我在R中有一个数据，上面有学生I和测试中的问题I。学生按顺序回答问题，但不必回答每一个问题。对于每个学生和问题，我想得到的是有多少学生回答了前面的问题( questID<是当前的questID)。下面是一个带有一些预期计数的dataframe示例。例如，studentID 1在questID 3上回答了之前的两个问题(1和2)，还有另外两个独特的学生(studentID 2和3)回答了这些问题。知道我怎么能在R中得到这些计数吗？
数据
DF <- data.frame(studentID = c(rep(1, 4), rep(2,3), rep(3, 2)),
浏览 5提问于2019-12-08得票数 0
回答已采纳
1回答
我已经下载了一个包含长期(1992-01-01 to 2016-12-31)温度数据的NC文件，我想使用R将月平均温度和年平均温度提取到一个空间TIFF文件中，这样我就可以在我拥有的Excel数据集中提取月平均温度数据，但我不知道如何提取。可以从here访问数据。 如果有人可以帮助我的编码，这将是适当的。 通过下面的代码，我尝试打开并查看数据： library(ncdf4)
library(raster)
temp <- nc_open("dataset-ibi-reanalysis-phys-005-002-monthly_1547718004288.nc",writ
浏览 155提问于2019-01-29得票数 0
1回答
我已将数据读入R中，在R中，我试图按小时对数据进行分组，代码如下：
tweets <- read.csv("tweetCSV.csv", header = TRUE, sep = ",", stringsAsFactors = FALSE)
tweets %>%
group_by(format(Time, "%H"), Word) %>%
summarise(count=n())
当我运行这段代码时，我会得到一个错误(如下所示)，我无法理解这个错误：
Mutate_impl中的错误(.data，dots)：无效的'
浏览 0提问于2017-04-06得票数 3
回答已采纳
我基本上是在寻找与R中的以下python代码相当的代码：
df.groupby('Categorical')['Count'].count()[0]
以下是我在R中所做的工作：
by(df$count,df$Categorical,sum)
这完成了与第一段代码相同的任务，但我想知道如何将索引值存储到R中的变量(新到R)中。
浏览 0提问于2019-05-01得票数 1
回答已采纳
2回答
所以，我检查了多个帖子却什么也没找到。根据的说法，我的代码应该能工作，但它不起作用。
目标:我想从本质上打印出主题的数量--在这个例子中，也就是这个tibble中的行数。
代码：
data<-read.csv("advanced_r_programming/data/MIE.csv")
make_LD<-function(x){
LongitudinalData<-x%>%
group_by(id)%>%
nest()
structure(list(LongitudinalData), class = "Long
浏览 8提问于2018-01-05得票数 3
谢谢你看这个！
我想要一个函数来构建表，显示特定变量的统计数据(如平均值)，这些变量被重新划分为组。
下面是一个功能的开始，工作到一定程度！我使用了一个例子，使用内置的mtcar数据。
MeansbyGroup<-function(var){
M1<-mtcars %>% group_by(cyl)
n1=deparse(substitute(var))
r1<-transpose(M1 %>% summarise(disp=mean(var)))[2,]
}
# EXAMPLE using mtcars
df=MeansbyGroup(mtca
浏览 3提问于2022-11-08得票数 0
各种R函数使使用group_by和总结从分组变量中提取值变得容易。因此，在结果数据each中，我可以使用group_by并进行总结，例如创建一个新列，该列包含每个组中变量的最大值或最小值。这意味着，使用这些数据：
name, value
foo, 100
foo, 200
foo, 300
bar, 400
bar, 500
bar, 600
我可以很容易地得到名称的每个值的最大值或最小值：
group_by(name) %>% summarize(maxValue = max(value)
但是假设我想要每个名字的第二位值？意思是假设我希望我的结果是
name maxValue mid
浏览 10提问于2022-11-15得票数 1
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
2回答
我目前从R开始，想知道如何从下面的数据集中计算每天每个节点每个复制的观察次数，并将其存储在不同的数据集中。原始数据集如下所示：
📷
希望生成的数据集如下所示：
📷
有人能帮我找出我怎么能在R里做到这一点吗？谢谢
浏览 0提问于2020-07-02得票数 1
我正在尝试使用来自RStudio服务器的sparklyr。星火安装在一个集群中，我使用纱线连接。对齐操作是正确的，但是当我尝试一个简单的例子，如从文档中获取时，我会得到错误：
(函数(类，fdef，mtable)中的错误:找不到用于签名‘tbl_spark’的函数‘count’的继承方法
这是我的简单代码：
> library(sparklyr)
> library(dplyr)
> sc <- spark_connect(master = "yarn")
> head(iris)
Sepal.Length Sepal.Width Petal.
浏览 1提问于2018-05-08得票数 0
我有一个与年度序列相对应的值表，我想知道R的代码，如果是最高值，R会给出年份？
library(dplyr)
df<-tibble(value=c(10,20,30,20,40,60),year=c(2001,2001,2001,2002,2002,2002))
浏览 3提问于2021-09-17得票数 1
我正在学习用我的课堂数据来使用R。我把当地学校网站上的数据刮到excel上，然后把它读到R中。每次测验之后，我想把数据汇总到一个表格中。例如，我有两张桌子
Subject Correct Incorrect
1 Math 9 1
2 Chemistry 7 6
Subject Correct Incorrect
1 Math 4 3
2 Biology 3 6
我想以
Subject Correct Incorrect
1 Mat
浏览 6提问于2022-07-14得票数 1
回答已采纳
做这种事的正确方法是什么？我正在尝试为特定的列获取每个组的colSums。使用这种类型的子设置，.语法似乎不正确。
csv<-data.frame(id_num=c(1,1,1,2,2),c(1,2,3,4,5),c(1,2,3,3,3))
temp<-csv%>%group_by(id_num)%>%colSums(.[,2:3],na.rm=T)
浏览 1提问于2016-11-05得票数 0
回答已采纳
1回答
我有一个类似这样的散列数组，为了演示目的，我删除了一些记录。
[
{
"id"=>425343308605714432,
"text"=>"Hello",
"sender"=> {
"id"=>1375480994,
"name"=>"Rocket"
},
"sender_id"=>1375480994,
"recipient"=&
浏览 2提问于2014-01-21得票数 2
回答已采纳
我正在处理R中“nycflights13”包中的“航班”数据集。
我想添加一个列，它增加了2013年每一家‘运营商’所覆盖的总距离。我得到了每个载波覆盖的总距离，并将值存储在一个新变量中。
我们有16个载波，所以我如何用更多行的数据帧绑定一行16个数字。
carrier <- flights %>%
group_by(carrier) %>%
select(distance) %>%
summarize(TotalDistance = sum(distance)) %>%
arrange(desc(TotalDistance))
如何将这些载波距离之和添加到飞行数
浏览 6提问于2022-03-29得票数 0
回答已采纳
我想在R中创建一个函数，它允许根据我的函数的单个参数中的2个变量对数据帧进行分组。 我的例子： library(dplyr)
myfunction <- function(vars=NULL) {
starwars %>%
group_by(!!sym(vars)) %>%
summarise(stat=mean(height,na.rm=T))
}
# It works
myfunction(vars="gender")
# It doesn't work
myfunction(vars=c("ge
浏览 3提问于2020-12-07得票数 0
回答已采纳
我有一些数据，我想要找到连续的值<=2，而连续值的长度应该>3。我的目标是(1)找到不同组的连续值的长度，(2)在每个组中找到第一个值的位置。我尝试了以下代码：
set.seed(100)
pre = sample(x=1:5, size = 90, replace = T)
which(pre<=2)
这将产生以下结果：
[1] 1 2 4 8 10 13 14 17 18 19 26 30 33 37 40 41 49 50 51 52 53 54 56 57 58 60 66 69 72 80 85 88 89
因此，保守值组包括：(1)17、18、19；(2)
浏览 0提问于2018-04-30得票数 3
回答已采纳
下面的函数从数据集中提取线性回归模型。
eqlabels <- function(data, x, y){
m <- lm(x ~ y, data);
eq <- substitute(italic(y) == a + b * italic(x) * "," ~~ italic(r) ^ 2 ~ "=" ~ r2,
list(a = format(coef(m)[1], digits = 3),
b = format(coef(m)[2], digi
浏览 5提问于2015-11-28得票数 1
回答已采纳
1回答
我有一个数据框架，例如：
letter class value
A 0 55
B 1 23
C 1 12
D 1 9
E 2 68
F 2 78
G 2 187
我希望对每个类中的行进行随机采样，以便将一个letter关联到一个新的随机value (但来自同一个类)。
期望的示例输出：
letter class value
A 0 55
B 1 12
C 1
浏览 0提问于2019-01-18得票数 5
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
