个人中心
文章发布
退出
作者热门文章
- html - 出于某种原因，IE8 对我的 Sass 文件中继承的 html5 CSS 不友好？
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景？
25
4
<分区>
我在网上广泛查看，但没有看到这个特定问题的答案(我认为)。
对我来说，最好的 self 解释方式是使用一些代码来重现我的问题。我做了一些临时数据:
x <- runif(100,1,2)
y <- runif(100,2,3)
z <- c(rep(1,100))
temp <- cbind(x,y,z)
temp[1:25,3] = temp[1:25,3] +2
temp <- as.data.frame(temp)
这就是 temp 的样子
x y z
1 1.512620 2.552271 3
2 1.133614 2.455296 3
3 1.543242 2.490120 3
4 1.047618 2.069474 3
. . . .
. . . .
27 1.859012 2.687665 1
28 1.231450 2.196395 1
它一直持续到数据帧的末尾(100 行)。
我想做的是将函数应用于数据框，但应用于数据的子集。因此，例如，我想在 z=3 时将函数均值应用于列 x 和 y，并在 z=1 时将函数均值应用于列 x 和 y。所以我最终会得到 4 个值:当 z=1 和 z=3 时 x 的平均值以及当 z=1 和 z=3 时 y 的平均值。对于我的实际数据集，当 z= 某个值时的行数变化很大。
我一直在使用以下有效的代码；然而，这让我感到非常不安，因为我觉得代码可以更高效并且最好避免 for 循环。
x <- c(unique(temp$z))
我使用它 ^^ 来获取唯一的 z 值(在本例中为 z=3 和 z=1)。
for(i in x){
assign(paste("newdata",i,sep=""),subset(temp[which(temp$z==i),],select=c("x","y")))
}
所以我现在有两个新数据框 newdata1 和 newdata3，它们的行数不同。 newdata1 是 z=1 时的所有值，newdata3 是 z=3 时的所有值。
library(gdata)
blah <-cbindX(newdata1,newdata3)
我再次使用 cbindX 将子集数据合并到一个大数据框中。我不确定我为什么要这样做(我很久以前就写了这段代码)。我只记得这是我在使用上面的 for 循环时让它工作的唯一方法。代码的主要问题是当我有多个 z 值时，手动输入该列表变得非常麻烦。如果 z 的范围从 1 到 50，那么用户将键入 newdata1、newdata2、newdata3 .... 等等。
但是...它确实有效:
summ.test <- apply(blah,2,function(x) {
c(min(x,na.rm=TRUE),median(x,na.rm=TRUE),max(x,na.rm=TRUE),sum(!is.na(x)))})
x y x y
[1,] 1.028332 2.018162 1.012379 2.009595
[2,] 1.509049 2.504000 1.427981 2.455296
[3,] 1.992704 2.998483 1.978359 2.970695
[4,] 75.000000 75.000000 25.000000 25.000000
所以我有效地做的是创建一个新的数据框，其中包含我之前从子集化的值，并将感兴趣的函数应用于它们。所以第一行是:当 z=1 时 x 的平均值，当 z=1 时 y 的平均值，当 z=3 时 x 的平均值，当 z=3 时 y 的平均值。
应该相当明显的主要问题:对数据框进行子集化的 for 循环方法会导致比我希望的更多的问题。有什么建议可以完全避免这种情况并最终得到相同的结果吗？
请让我知道这是否令人困惑，或者我的代码是否很草率!仍在处理此网站上的问题格式......
25
4
0
我正在执行大型 ffdf 对象的子集，我注意到当我使用 subset.ff 时，它会生成大量 NA。我通过使用 ffwhich 尝试了另一种方法，结果要快得多，并且没有生成 NA。这是我的测试: li
我对 Prolog 有点陌生。我正在尝试编写一个函数subset(Set, Subset) 来确定Subset 是否是Set 的子集(duh)。另外，如果第二个参数没有实例化，它应该输出每个可能的子集
一、题目 给你一个整数数组 nums ，数组中的元素 互不相同 。返回该数组所有可能的子集（幂集）。 解集 不能 包含重复的子集。你可以按 任意顺序 返回解集。 二、示例 输入：nums = [1,2
我想从数据帧的操作中排除一列。当然，我可以在没有要排除的列的情况下复制数据框，但这似乎是一种解决方法。我认为必须有一种更简单的方法来进行子集化。 所以这个示例代码应该显示我在做什么。 df colMe
我有一个 SpatialPolygonsDataFrame我通过使用 readOGR 读取 shapefile 创建的在 rgdal包裹。我正在尝试使用它来使用 spsample 生成采样网格在 sp
我想解决一个简单的问题，但即使我尝试了很多不同的方法，我也找不到解决方案。我正在使用 SICStus Prolog (如果这很重要)，并且我想获取列表的所有子列表/子集(我不知道哪个术语是正确的)，其
我目前正在使用 shinyTable，它是 HandsonTable (https://github.com/trestletech/shinyTable) 的 shiny 兼容实现。巧合的是，我意识
我正在 Delphi 中构建一个表单，其中包含服务下拉列表和用于选择服务的附加组件网格。我获取的数据来自 API，并且我将服务的数据存储在 ADODataSet 中，如下所示: ID (integer
subset() 函数有问题。如何通过观察次数对我的数据框的一个因子进行子集化？ NAME CLASS COLOR VALUE antonio
我想知道是否有任何简单的算法来比较一个散列是否是另一个散列的子集。 例如，如果 $HASH{A} = B; $HASH{B} = C; $HASH{C} = D; $HASH2{A} = B; $HA
这个问题在这里已经有了答案: Array combinations without repetition (1 个回答) 关闭 8 年前。 给定一个数组，如何在 postgresql 中找到一定大小
我有下一个程序。我应该如何在 main 中使用迭代器以显示总和为 0 的子集？ 我的程序应该打印: 2 -2 5 -5 # include # include using namespace st
我正在寻找一个可以自定义的 Markdown 解析器，最好是 Javascript。特别是，我想删除使用实际 HTML 标签的选项。我尝试编辑摊牌的来源，但无法弄清楚。 Jquery 集成也很好，尽管
我有一个包含名称列表的文件(引用文件 1): Apple Bat Cat 我有另一个文件(引用文件 2)，其中包含名称列表和详细信息引用: Apple bla blaa aaaaaaaaagggggg
我有两个带有排序行的文件。一个文件 (B) 是另一个文件 (A) 的子集。我想找到 A 中不在 B 中的所有行。理想情况下，我想创建一个包含这些行的文件 (C)。这在 Unix 中可能吗？我正在寻找一
我有一个包含肽序列的列的数据框，我只想保留字符串中没有内部“R”或“K”的行。 df1 <- data.frame( Peptide = c("ABCOIIJUHFSAUJHR", "AOFI
这个问题在这里已经有了答案: How to subset matrix to one column, maintain matrix data type, maintain row/column na
假设我有一个列表向量: library(tidyverse) d 2) # A tibble: 5 x 1 x 1 2 3 4 5 最佳答案 应该是 lengt
我自己从来没有运行过javadoc(无论是在命令行还是ant's javadoc task；我将使用ant)——我需要为我编写的库生成一个javadoc。 问题是我的 java 库被组织成几个包，在
假设一个多方加密方案，类似于答案:Encryption with multiple different keys? . 那是。一组键K可以用来破译密文。 有没有办法过期: K'⊆ K 这样 K \ K
我是一名优秀的程序员,十分优秀！