创建一个具有which和runif函数的'df‘
创建一个具有which和runif函数的'df'，可以使用R语言来实现。
首先，我们需要了解一下这两个函数的概念和作用。
- which函数：which函数用于返回满足指定条件的元素的索引。它可以用于查找向量中满足特定条件的元素的位置。
- runif函数：runif函数用于生成指定长度的随机数向量，这些随机数服从均匀分布。
接下来，我们可以按照以下步骤来创建具有which和runif函数的'df'：
- 首先，我们需要创建一个包含随机数的向量。可以使用runif函数生成一个长度为n的随机数向量，其中n是你想要的向量长度。例如，我们可以使用以下代码生成一个长度为10的随机数向量：
random_vector <- runif(10)- 接下来，我们可以使用which函数来查找满足特定条件的元素的索引。例如，我们可以使用以下代码找到随机数向量中大于0.5的元素的索引：
indices <- which(random_vector > 0.5)- 最后，我们可以将随机数向量和满足条件的元素的索引组合成一个数据框（data frame）。可以使用以下代码创建一个名为'df'的数据框，其中包含两列：'random_numbers'和'indices'。
df <- data.frame(random_numbers = random_vector, indices = indices)至此，我们成功创建了一个具有which和runif函数的'df'，其中'random_numbers'列包含随机数向量的值，'indices'列包含满足条件的元素的索引。
推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云函数计算（云原生无服务器计算服务）：https://cloud.tencent.com/product/scf
- 腾讯云数据库（云原生数据库服务）：https://cloud.tencent.com/product/cdb
- 腾讯云服务器（云原生计算服务）：https://cloud.tencent.com/product/cvm
- 腾讯云人工智能（AI服务）：https://cloud.tencent.com/product/ai
- 腾讯云物联网（物联网平台）：https://cloud.tencent.com/product/iotexplorer
- 腾讯云移动开发（移动应用开发平台）：https://cloud.tencent.com/product/mad
- 腾讯云对象存储（云原生对象存储服务）：https://cloud.tencent.com/product/cos
- 腾讯云区块链（区块链服务）：https://cloud.tencent.com/product/baas
- 腾讯云游戏多媒体处理（游戏多媒体处理服务）：https://cloud.tencent.com/product/gmp
- 腾讯云音视频通信（音视频通信服务）：https://cloud.tencent.com/product/trtc
- 腾讯云网络安全（云原生网络安全服务）：https://cloud.tencent.com/product/ddos
- 腾讯云CDN加速（内容分发网络服务）：https://cloud.tencent.com/product/cdn
相关·内容
我有一个很大的数据帧，我知道最大值是74，但是我如何才能找到这个值的索引值。即我需要什么代码才能找到这个值 dfx，y= 74 x和y是什么？
浏览 19提问于2020-10-23得票数 0
我需要编写一个R代码，其中我将使用Box-Muller方法来生成随机的卡方分布值。我有一个从均匀到正态生成随机值的代码，然而，似乎找不到我的方法来进一步为卡方分布和t分布做这件事。 这是一个通用代码： A <- runif(n, 0, 1)
B <- runif(n, 0, 1)
X1 <- sin(2*pi*A)*sqrt(-2*log(B))
X2 <- cos(2*pi*A)*sqrt(-2*log(B)) 这将输出正态分布的rvs。现在，我是不是应该将X1和X2相加？ 在t分布中，如何从X1和X2中推导出一个正态分布的变量？
浏览 22提问于2021-10-04得票数 0
我试图编写一个条件语句，它将检查向量中的任何值是否符合条件，然后根据条件写入结果。在下面的示例中，我知道c2的和比其他列小得多，但在实际数据中，我不知道哪一列有较小的和。我想检查csum向量中的任何值是否小于.1，如果是，则将列索引写入数据帧。此外，在某些情况下，.1下面将有两列，因此我需要将这两个列索引写入数据框架。
c1 <- runif(16,.3,.6)
c2 <- c(.01,.01,.01,.01,rep(.00,12))
c3 <- runif(16,.3,.6)
c4 <- runif(16,.3,.6)
c5 <- runif(16,.3,.6)
浏览 0提问于2018-10-03得票数 2
回答已采纳
我正在尝试从构建(并且我借用了自成一体的例子和标题灵感)。我试图对ggparcoord的每一行分别应用透明度，或者在另一行上添加两层ggparcoord。下面详细描述了我所拥有的解决方案的问题和数据格式。
我有一个有上千行的数据集，我们称之为x。
library(GGally)
x = data.frame(a=runif(100,0,1),b=runif(100,0,1),c=runif(100,0,1),d=runif(100,0,1))
在对这些数据进行聚类之后，我还得到了一组5行数据，让我们将其称为dataset y。
y = data.frame(a=runif(5,0,1),b=
浏览 2提问于2015-12-16得票数 1
回答已采纳
我看了这个问题的变体，但没有找到worked...so在这里的答案。我有很多数据框，每个数据框代表一个心理指数(他们问几个问题，它们的平均值给你一个关于你正在测量的东西(愤怒，焦虑，等等)的分数)。在本例中，我将选择其中的三个: SA、SE、GT
我想创建一个for循环来自动计算每个数据帧中列的平均值，然后使用该平均值添加一个新列。
我可以为一个数据帧创建一个for循环来做这件事，但是我该如何循环这个循环来为我所有的数据帧(比3多得多)做这件事呢？
#This is the for loop to do it for just one data frame (SA)
avg <- c()
浏览 0提问于2019-09-10得票数 0
我有一个93行的超帧。每一行都包含类ppp树的树状图以及地块级别的分组因素。标记的数据提供了点特定的数据，例如每个点的直径、种类和高度。我需要根据标记的数据对点模式进行子集，然后运行need函数，它需要将数据集合起来。我已经找到了基于超帧列的单点模式的子设置标记和基于列的超帧的子设置示例，但我还没有看到从具有多个标记的dataframe中调用一个因子的元素级别的例子。如有任何指导，将不胜感激。
我可以将超帧按地块水平因子进行子集，例如a、b和c植被类型，然后对每个地块运行一个Lest，根据植被类型将输出集中起来，并绘制集合Lest (pg )。684的Baddeley等人。2015年提供了一个
浏览 0提问于2018-10-29得票数 0
回答已采纳
我不完全确定这是属于这里还是属于统计，但我认为这更多的是一个编程问题，而不是一个统计问题。不管是哪种情况，我都觉得自己的问题超出了我的能力范围，所以就这样吧。
我有一些关于几年来从发源国iso_o流向目的地国家iso_d的面板数据。作为自变量，我将具有来源国、目的地国特征的变量和与来源国和目的地国之间的关系有关的变量作为自变量。我的数据看起来像这样：
set.seed(0)
iso_o <- LETTERS[rep(1:3, each = 3, times = 2)]
iso_d <- LETTERS[rep(1:3, times = 6)]
year <- rep(1990
浏览 0提问于2018-10-05得票数 1
2回答
我想用R中特定分布产生的随机数填充NA值，我已经看到了一些用平均值计算NA值的方法，但是还没有见过用某个分布产生的一些数字来计算NA值。例如，我有一个数据df如下所示：
df <- data.frame(id = c(1,1,1,2,2,NA,2,3,NA,5,5,NA,9,9))显然有一些NA值。我想用均匀分布产生的数字来代替它们。假设我想用制服上的数字(4，8)来计算NA。有什么简单的方法吗？
浏览 4提问于2022-07-10得票数 0
回答已采纳
我正在运行一个带有If-子句的嵌套for循环，以确定我的矩阵中哪个相关性高于90% (.9)或小于100% (1)。在运行我创建的循环时，它只提供以下输出：
请参阅我的代码如下：
colss = ncol(x)
rowss = nrow(x)
for (i in rowss){
for (j in colss){
if (x[i,j] > .9 || x[i,j] < 1){
print(x[i,j])
}
}
}
是否有一种方法可以获得DF中的位置，其值为(>9.x\x< 1)?
示例输出：
12 .90
15 .92098
浏览 1提问于2020-03-29得票数 0
回答已采纳
因此，我目前有三个数据帧，我需要平均每个单元格，我不知道如何做到这一点.本质上，我需要获得第1列中df1、df2、df3的第一个观察值的平均值，就像每个观察结果一样。
这是一个可重复的样本数据。
set.seed(789)
df1 <- data.frame(
a = runif(100, 0, 100),
b = runif(100, 0, 100),
c = runif(100, 0, 100),
d = runif(100, 0, 100))
df2 <- data.frame(
a = runif(100, 0, 100),
b = runif(100, 0, 1
浏览 1提问于2017-04-09得票数 2
回答已采纳
我想知道是否在ggplot2包或另一个包中有一个函数，或者在R中有一种for循环的方式，可以从不同的变量/数据帧的列创建不同的图形，而不需要对每个变量进行编码，每个图形对应一个变量。例如，如果我有一个名为df的数据帧，其中有几列：id (数据键)、v1、v2、...、v10。我想在Y轴上绘制不同的变量(从v2到v8)，在X轴上画v1，但不要对每个变量重复相同的代码。 # For 1 plot, how could I code for various plots?
plot_v2 <- df %>% # (plot_name as column name, i.e plo
浏览 12提问于2021-10-27得票数 0
回答已采纳
1回答
按日期范围计算平均值和中位数
、、、、
只为数据表计算按选定日期范围分组的数值变量的平均值和中位数，而不计算单张数据。小叶地图可以工作(只需缩小即可看到虚假的经纬度图，但现在不必担心)。 我为数据的数据表中值/平均值总和创建了第二个dataframe df10。 到目前为止，我尝试改变输入函数来为均值创建单独的变量，但发现这很麻烦，并且不需要满足我的需求。 尝试在此处Shiny calculate the mean of columns in dataframe使用colMeans(dataset()[,which(sapply(dataset(), class) != "Date")]) 错误是"inva
浏览 16提问于2019-05-30得票数 0
回答已采纳
1回答
我有一个顶点和边的graph，我想用fruchtermanreingold布局来绘制它。
下面是graph边矩阵：
edge.mat <- matrix(as.numeric(strsplit("3651,0,0,1,0,0,0,0,2,0,11,2,0,0,0,300,0,1,0,0,66,0,78,9,0,0,0,0,0,0,11690,0,1,0,0,0,0,0,0,0,0,493,1,1,0,4288,5,0,0,36,0,9,7,3,0,6,1,0,1,7,490,0,0,0,6,0,0,628,6,12,0,0,0,0,0,641,0,0,4,0,0,0,0,0,0,
浏览 1提问于2018-10-03得票数 2
回答已采纳
2回答
R中NA和布尔和的处理
、、、
我正在尝试创建一个新变量，该变量涉及一个数值和一个逻辑(指示符)的乘积之和，但最终结果是没有意义的。
数据
我已经生成了以下数据集，作为我正在处理的问题的最小可重现性示例。每一行都是单独的，mJSW_BL、mJSW_12、mJSW_24和mJSW_36列是基线、12、24和36的度量。我正在创建的最后一个变量JSNCASE_TP表示个人第一次(12、24或36)满足案例定义(从基线下降0.7)。JSNCASE_TP的计算应该忽略NA值，并且可以接受0、12、24或36的值。
require(dplyr)
set.seed(1)
N = 10
mJSW_BL <- runif(N,0.1
浏览 1提问于2019-08-02得票数 1
回答已采纳
我想在向量上回归数据集中的每一列，然后返回R平方值最高的那一列。例如，我有一个向量HAPPY <- (3,2,2,3,1,3,1,3)，我有一个数据集。
HEALTH CONINC MARITAL SATJOB1 MARITAL2 HAPPY
3 441 5 1 2 3
1 1764 5 1 2 2
2 3087 5
浏览 0提问于2012-04-20得票数 6
回答已采纳
我有一个包含2个变量A和B的数据帧df。我想将A分成组1和组2，以便mean(df$B[df$group==1])尽可能接近mean(df$B[df$group==2])
或者换一种方式来说，我想要的是在df$A中找到一个切入点(cutp)来最小化abs(mean(df$B[df$A<cutp])-mean(df$B[df$A>=cutp]))
有什么想法吗？
浏览 0提问于2012-01-15得票数 1
回答已采纳
2回答
关于R中的数据帧的问题。我想从数据帧中提取一行，以及它在原始数据帧中的位置(行号)。其思想是创建包括从先前数据帧中提取的行信息以及从先前数据帧中提取的行位置的新数据帧。
patchLocalNo <- patchList[which(patchListTop5$sensitivity == patchLocalSpec),]
我想要做的是从patchList中获取满足which条件的行号，并将它们添加到patchLocalNo中的列中。
提前感谢您，我已经在网上搜索并询问了同事，我所能想到的就是在perl中预处理数据的变通方法。
浏览 1提问于2011-04-05得票数 3
回答已采纳
4回答
我想要生成一个0到1之间的随机数，但这不是在.4和.6之间。在R中有比下面这样做更好的方法吗？
sample(c(runif(1,0,.4), runif(1,.6,1)), 1, prob=c(.5,.5))
浏览 0提问于2018-07-10得票数 2
回答已采纳
我的代码在这里遇到了问题。我想创建一个新的df1，它(a)具有在选定范围内生成的随机数，并且还列出了来自Q_Sheet接近它的另一个数据帧的数字的行和列。任何建议都将受到欢迎。 df1<- data.frame(T4=c(runif(n=1,min=5,max=6),
which(Q_Sheet$T_degC==df1[1,1],arr.ind=T)) V_Sheet Amino_acids Protein_Length_Ang Length_no_ratio Corrected_aa aa_freq T_degC
4 7
浏览 26提问于2021-06-16得票数 0
回答已采纳
我正在编写一个函数，它将根据不同的条件对数据进行子集。我需要返回具有最大行计数的数据。
df2 <- as.data.frame(matrix(runif(n=10, min=1, max=20), nrow=200))
df3 <- as.data.frame(matrix(runif(n=10, min=1, max=20), nrow=90))
df4 <- as.data.frame(matrix(runif(n=10, min=1, max=20), nrow=600))
df5 <- as.data.frame(matrix(runif(n=10, min=
浏览 3提问于2022-11-14得票数 0
2回答
使用SF的光栅聚合值
、、、、
使用SF的光栅聚合值
我需要的是对每个栅格的某个度量值进行汇总。假设我们有一些数据坐标和值，我想要创建一个热图。
首先，使用简单的特征框架创建网格和栅格。现在，我需要获取df中的每个坐标，并检查它们是否在一个栅格中。然后，对于每个光栅，计算任何其他聚合函数的平均值。
# Packages ----------------------------------------------------------------
library(raster)
library(tidyverse)
library(sf)
library(sp)
# Border Data and Grid ----
浏览 3提问于2021-04-01得票数 0
回答已采纳
假设我有一个Betas向量(回归系数)，如下所示：
> ResultDos$coefficients[-1]
WOE_PPIExFoodEnergyTradeMoM
7.371144
WOE_ChangeinHouseholdEmployment
13.089279
WOE_Reta
浏览 1提问于2018-10-31得票数 0
回答已采纳
1回答
我有一个数据集，通过行检查大约25列，看看它们是否包含列表中的值。引用要搜索的值列表没有问题，但我在一次搜索多个列时遇到了问题。我最初想创建一个要引用的列列表，但由于不能使用列表，这看上去不起作用。
现在，我正在单独检查每个列的一组值，但是我希望用更少的代码来完成这一任务，因为我希望在清理这些数据时不止一次地引用这组列。这是我目前正在使用的：
Dx.Elem<-list(c("DX1", "DX2", "DX3", "DX4", "DX5", "DX6", "DX7",
浏览 0提问于2018-08-21得票数 0
回答已采纳
1回答
我想创建一个球体的3d散点图，它们的颜色是第四维。我有一个csv文件中的数据，其中每一行都表示粒子的x，y，z位置，我有一列告诉我粒子的值(1,2或3)。如果球的值是1，我想用一种颜色给球上色，否则用另一种颜色。
编辑：
我创建了以下代码：
library(rgl)
m <- read.csv(file="mem0.csv", sep = ",", head=TRUE)
mcol = m$val
i = 1
mdim = dim(m)
while (i <= mdim[1] ){
if (mcol[i] == 1){
mcol[
浏览 0提问于2011-03-07得票数 9
回答已采纳
我是R的新手，有一些问题。我有一个大约有6700行和1700列的数据帧。我想用一个叫做“模拟器”的包来运行一些模拟。对于这个包，您需要输入数据帧的两列的名称(在下面的代码行中，它们是J，j)，然后模拟运行。 sim_par <- hapmap2gamete(geno = geno1[,c(J,j)], map = map, ref = ref, chr2exclude = 22) 我想提高脚本的自动化程度。我已经创建了一个包含两列的列表，每列都包含数据帧中列的名称。我希望模拟遍历列表的每一行。我怎么能做到呢？目前，我只能在使用单列列表对数据框子集化后运行模拟，然后使用以下代码行 for
浏览 31提问于2020-10-08得票数 0
我有一个简化的数据框架1 (df1)：
set.seed(100)
df1 = data.frame(greater_than_or_equal_to= unique(cummax(sample.int(100))))
df1$less_than = c(df1$greater_than_or_equal_to[2:nrow(df1)],
df1$greater_than_or_equal_to[nrow(df1)]+3)
df1$score1 = round(runif(10,1,10),1)
df1$score2 = round(runif(1
浏览 2提问于2017-10-12得票数 0
回答已采纳
1回答
在R中寻找核平滑回归的最佳带宽
、、、、
我模拟了双变量数据(x，y)，其中y具有平均值1/x和一些方差。数据看起来像这样：
我正在使用内核平滑回归来尝试找到这种关系。
kernelreg = ksmooth( train_points$x, train_points$y, kernel = "normal", bandwidth = h) plot(y~x, train_points , cex = 0.5, col = "dodgerblue", main = "Data set") lines(kernelreg,lwd = 2, col = 2)
我想知道如何编写一个函数来通过带
浏览 8提问于2021-05-09得票数 0
5回答
我正在寻找一种将lm残差绑定到输入数据集的方法。该方法必须为丢失的残差添加NA，并且残差应该对应于正确的行。
示例数据：
N <- 100
Nrep <- 5
X <- runif(N, 0, 10)
Y <- 6 + 2*X + rnorm(N, 0, 1)
X[ sample(which(Y < 15), Nrep) ] <- NA
df <- data.frame(X,Y)
residuals(lm(Y ~ X,data=df,na.action=na.omit))
残差应该绑定到df。
浏览 0提问于2012-12-03得票数 4
回答已采纳
我有一些结构不佳的数据，我正在尝试清理。我有一个关键字列表，可以用来从CSV文件中提取数据帧。我的原始数据结构大致如下:有7列有值，第一列都是字符串标识符，如信用评级或国家符号(对于外汇数据)，而其他6列要么是标题，如百分比变化字符串(例如+10%)，要么只是一个数值。由于我将所有这些数据汇总在一起，因此我希望能够提取每个类别的数据。例如，在我的第一列中，我想提取"credit“关键字和"FX”关键字之间的所有行。有没有办法在base R或dplyr中轻松地做到这一点？
例如：
df %>%
filter(column1 = in_between("cre
浏览 3提问于2018-08-24得票数 0
1回答
我试图用r中的动态图库在同一幅图上绘制两个不同尺度的级数。
dygraph(data.frame(x = 1:10, y = runif(10),y2=runif(10)*100)) %>%
dyAxis("y", valueRange = c(0, 1.5)) %>%
dyAxis(runif(10)*100,name="y2", valueRange = c(0, 100)) %>%
dyEvent(2, label = "test") %>%
dyAnnotation(5, text = "A
浏览 1提问于2022-11-12得票数 1
回答已采纳
1回答
样本数据：
library(dplyr)
id <- rep(LETTERS[1:5], each = 10)
x <- round(runif(50, -500, 200), digits = 0)
y <- round(runif(50, -700, 700), digits = 0)
z <- round(runif(50, 250, 300), digits = 0)
df.1 <- data.frame(id = id, x = x, y = y, z = z)
> summary(df.1)
id x
浏览 1提问于2017-06-12得票数 0
回答已采纳
2回答
在循环中运行R脚本
、、、、
本文利用R.中的growthrates软件包对96口井板的产量进行了分析，得到最大增长率。96井板输出文件的结构如下：
Time A1 A2 A3 A4
0 0.116 0.122 0.144 0.108
总共有866行。为了运行growthrate，我正在提取时间和第一口井，并进行分析。这是因为如果时间被重复，growthrate将不会运行。我为A1和A2编写了一个运行脚本，这给了我输出。但问题是，我不知道如何循环整个井。
这是我的代码：
test3
## extrcating column 1 and 2
浏览 3提问于2022-08-15得票数 0
回答已采纳
3回答
目前，我在R中遇到了一个非常特殊的问题:我有一个大约的数据集。250万行，显示基于事件的购买行程数据。格式如下(为了简单起见，我排除了大多数人口统计数据和其他一些变量)：
UserID PurchaseID Time of Contact Purchase Age
1 1 2015-08-07 19:16:59 0 35
1 1 2015-08-07 21:17:32 0 35
1
浏览 0提问于2018-03-30得票数 4
1回答
我有一个csv的时间序列数据，为许多网站，我为之制作图形，显示变化的手段使用转换点包。我编写了一个函数，该函数采用csv，执行一些计算以获得方法，然后循环遍历每个站点，为每个站点生成一个图。我的问题是找不到在for循环中创建的对象。
下面是一个非常简化的示例，但会产生相同的错误：
df1 <- data.frame(date = seq(as.Date("2015-01-01"), as.Date("2015-01-10"),
by = "day"),
site1
浏览 1提问于2015-05-22得票数 8
2回答
打印行和列名R中的最大值
、、、
我正在尝试创建一个函数，该函数接受一个数据框和数据框第一列中的一个值。让我们将数据框第一列中的值称为"value1“。这意味着该函数应为 Function <- function (data, value1) 如果从数据中找到"value1"，它应该返回"value1“、"value1”所在行的最大值以及最大值所在的列名。 如果没有找到"value1“，应该返回”Check值“。 到目前为止，我所做的是： value1 <- function(data) {
data[1]
}
Function <- function (d
浏览 8提问于2019-09-10得票数 0
2回答
我很抱歉标题不明确，但我不太清楚如何最好地用语言解释这个问题，而是尝试使用一个例子。我正在处理一个篮球数据集，其中位置列中的某些行具有NAs。我想用那个位置上最接近该位置平均高度的位置更新职位栏。下面是一个示例dataframe：
df_player <- data.frame(id = 1:100,
year = floor(runif(100,2000,2006)),
height = runif(100,70,85),
pos = s
浏览 0提问于2020-01-10得票数 0
回答已采纳
1回答
我有一个包含两个数字列的数据格式。对于每一行，我希望创建一个整数数组，该数组位于列中的值之间，并包含列中的值。然后，我希望将所有的值编译到一个列中来生成一个直方图。
输入：
df
C1 C2
A 3 -92
B 8 -162
C 20 -97
D 50 -76
输出：
sdf5$Values
-92
-91
-90
...
2
3
-162
-161
...
7
8
...
我的实际数据文件有62行。我当前的代码给出的频率> 100 (对于任何整数，最多应该是62 )。代码工作在一个虚拟数据，所以我不知道哪里出了问题。
list <- ma
浏览 3提问于2021-02-08得票数 0
回答已采纳
运行关联后，我需要标识每列中最大值所在的行。我正在使用which.max，但是我无法获取行名。相反，我得到的是一个毫无价值的索引号。每行都有一个名称。
apply(my.data,2,which.max)
浏览 0提问于2014-04-22得票数 3
2回答
求等矩阵线
、、、、
我有一个矩阵，其中每一行代表一个数据点(它是一个包含n个p维点的nxp矩阵)，我需要确定是否有一对相等的点。
只有两点，我可以只应用dist，但随着点数的增加，我需要与dist进行的比较量也是一样(因为我一次只比较两个点)。
所以，当我开始使用大矩阵时，我需要一种快速的方法来找出任何两个点是否相等(或者这个矩阵中有两个相等的行)。
有什么建议吗？
编辑:由于我不需要返回相等的行数(我只需要验证任何两个行是否相等)，我想我可以创建一个没有重复行的矩阵，只需要比较这个矩阵和原始矩阵之间的行数。你认为如何？
浏览 1提问于2013-12-03得票数 0
回答已采纳
2回答
我有两个数据帧。
set.seed(1234)
df <- data.frame(
id = factor(rep(1:24, each = 10)),
price = runif(20)*100,
quantity = sample(1:100,240, replace = T)
)
df2 <- data.frame(
id = factor(seq(1:24)),
eq.quantity = sample(1:100, 24, replace = T)
)
我想使用df2$eq.quantity来通过因子变量
浏览 2提问于2013-10-29得票数 1
回答已采纳
1回答
我想重新创建这个图： ? 我的数据如下所示： leafnumber <- c(6,7,8,9,6,7,8,9)
PU <- c(30,15,7,0,10,36,7,9)
weeknumber <- c(8,8,8,8,9,9,9,9)
df <- data.frame(leafnumber, PU, weeknumber) 所以我希望叶子编号在Y轴上结束，PU在X轴上结束。和weeknumber可以用来显示随时间的分布。 这是我的第一次尝试： ggplot(df,aes(leafnumber, PU)) +
geom_bar(stat = "id
浏览 28提问于2021-04-16得票数 2
1回答
我有一个数据集
outcome_data_wide_score1 <- outcome_data %>% select(group, community, site, sessions, patientid, score1) %>% arrange(sessions) %>% filter(group == 2 & province == "X") %>% pivot_wider(., names_from =sessions, values_from = c(score1))
我试图运行这些代码，以获得类似的输出，为不同
浏览 2提问于2020-08-01得票数 0
回答已采纳
1回答
如何使用配对创建散点图，方法是将数据(200行)以两种不同的颜色一行一行地分成两部分。我试过了
pairs(sbn[1:100,],col = "red",pch = 3)
我不知道如何为剩下的100行添加不同的颜色。
浏览 0提问于2016-03-11得票数 0
1回答
我正在努力在数据帧的多个列中应用我的函数。我有以下公式 test <- function(y, x, data) {
best.score <- min(data[data$income == y, ][[x]], na.rm=T)
(max(data[[x]], na.rm = TRUE)- data[[x]])/ (max(data[[x]], na.rm= TRUE) - best.score)
}
#When I apply it to one column for a data frame like this, it works and gives me a
浏览 15提问于2020-10-28得票数 0
6回答
满足条件的样本对
、、、
我有这个问题，我想不出来。我有500个A组样本来自均匀分布。另一种均匀分布的B组样品有500个。
我将选择一个值，a从A，另一个值，B从B，我想使'a总是小于b‘。我想要500双，没有重复。
A <- runif(500, min = 19, max= 23)
B <- runif(500, min = 22, max= 26)
我如何才能得到500对(a，b)，这是一个< b，没有重复？
编辑：
对不起，我要说清楚我的问题。一旦A组和B组被设置，它将不会被更改。500对应该从固定的A和B中选择。在每对中，a< b。
我想看到像蒙特卡罗那样的“随机”效应。所以
浏览 12提问于2015-09-10得票数 3
回答已采纳
我花了几天的时间在R中寻找能够满足所有标准OLS假设(正态分布、同方差、无多重共线性)的最优模型，但在12个变量中，不可能找到最优的var组合。因此，我正在尝试创建一个脚本，它将自动执行此过程。
下面是用于计算的示例代码：
x1 <- runif(100, 0, 10)
x2 <- runif(100, 0, 10)
x3 <- runif(100, 0, 10)
x4 <- runif(100, 0, 10)
x5 <- runif(100, 0, 10)
df <- as.data.frame(cbind(x1,x2,x3,x4,x5))
libra
浏览 5提问于2018-11-16得票数 0
6回答
在R中，我需要一些可能相当简单的内容，我想引用数据框架中的一系列列(例如，提取几个选择变量)。但是，我不知道他们的列号。通常，如果我想提取4-10列，我会说mydata,4:10。
但是，考虑到我不知道列号，我想用名字来表示它们。有什么简单的方法吗？在sas或spss中，按名字引用一系列变量是相当容易的。或者，是否有一种简单的方法可以确定哪个列号对应于R中的变量名？
浏览 1提问于2013-12-04得票数 6
回答已采纳
M1 M2 M3
M1_1 M1_2 M1_diff M2_1 M2_2 M2_diff M3_1 M3_2 M3_diff
A 55.2 60.8 5.6 66.7 69.8 3.1 58.5 60.3 1.8
B 56.8 55.4 1.4 62.8 63.9 1.1 65.7 69.8 4.1
C 52.3 54.3 2.0 53.8 55.9 1.1 56.7 57.9 1.2
我必须找出哪一个M1，M2，M3对每个A，B，C最合适。
浏览 1提问于2014-06-07得票数 0
回答已采纳
1回答
我建立了一个二元逻辑模型。响应变量是二进制变量。有4个回归符-2个二进制和2个整数。我想找出离群点并删除它们。为此，我制作了一些情节：
par(mfrow = c(2,2))
plot(hat.ep,rstudent.ep,col="#E69F00", main="hat-values versus studentized residuals",
xlab="Hat value", ylab="Studentized residual")
dffits.ep <- dffits(model_logi
浏览 1提问于2018-04-27得票数 2
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
