- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
搜索了类似的帖子后,我发布了我的问题。我有每个站点几年的月降雨量变量。我需要计算多年来的月平均降雨量。我给出了一个简单的数据框如下。我需要创建一个新的数据框,其中包含每个站点的月平均值 (12)。
d<-structure(list(ID = structure(1:4, .Label = c("A", "B", "C",
"D"), class = "factor"), X2000_1 = c(25L, 42L, 74L, 52L), X2000_2 = c(15L,
15L, 51L, 12L), X2000_3 = c(14L, 21L, 25L, 41L), X2000_4 = c(74L,
4L, 23L, 51L), X2000_5 = c(15L, 25L, 65L, 12L), X2000_6 = c(31L,
23L, 15L, 25L), X2001_1 = c(52L, 54L, 18L, 63L), X2001_2 = c(85L,
165L, 12L, 12L), X2001_3 = c(25L, 36L, 20L, 14L), X2001_4 = c(1L,
17L, 23L, 52L), X2001_5 = c(24L, 45L, 12L, 15L), X2001_6 = c(3L,
23L, 45L, 52L)), .Names = c("ID", "X2000_1", "X2000_2", "X2000_3",
"X2000_4", "X2000_5", "X2000_6", "X2001_1", "X2001_2", "X2001_3",
"X2001_4", "X2001_5", "X2001_6"), class = "data.frame", row.names = c(NA,
-4L))
输出应该是这样的;
df<-data.frame(id = c("A","B","C","D"))
df[c("jan","feb","mar","apr","may","jun")]<-NA
例如,单元格 A1 应包含 X2000_1 和 X2001_1 的平均降雨量
我尝试了如下代码,但它不起作用可能是因为我使用的是数据框。任何帮助将不胜感激。
n = 6
unname(tapply(d, (seq_along(d)-1) %/% n, sum))
我的实际数据框的列名是
c("est", "X1990_1", "X1990_2", "X1990_3", "X1990_4", "X1990_5",
"X1990_6", "X1990_7", "X1990_8", "X1990_9", "X1990_10", "X1990_11",
"X1990_12", "X1991_1", "X1991_2", "X1991_3", "X1991_4", "X1991_5",
"X1991_6", "X1991_7", "X1991_8", "X1991_9", "X1991_10", "X1991_11",
"X1991_12", "X1992_1", "X1992_2", "X1992_3", "X1992_4", "X1992_5",
"X1992_6", "X1992_7", "X1992_8", "X1992_9", "X1992_10", "X1992_11",
"X1992_12", "X1993_1", "X1993_2", "X1993_3", "X1993_4", "X1993_5",
"X1993_6", "X1993_7", "X1993_8", "X1993_9", "X1993_10", "X1993_11",
"X1993_12", "X1994_1", "X1994_2", "X1994_3", "X1994_4", "X1994_5",
"X1994_6", "X1994_7", "X1994_8", "X1994_9", "X1994_10", "X1994_11",
"X1994_12", "X1995_1", "X1995_2", "X1995_3", "X1995_4", "X1995_5",
"X1995_6", "X1995_7", "X1995_8", "X1995_9", "X1995_10", "X1995_11",
"X1995_12", "X1996_1", "X1996_2", "X1996_3", "X1996_4", "X1996_5",
"X1996_6", "X1996_7", "X1996_8", "X1996_9", "X1996_10", "X1996_11",
"X1996_12", "X1997_1", "X1997_2", "X1997_3", "X1997_4", "X1997_5",
"X1997_6", "X1997_7", "X1997_8", "X1997_9", "X1997_10", "X1997_11",
"X1997_12", "X1998_1", "X1998_2", "X1998_3", "X1998_4", "X1998_5",
"X1998_6", "X1998_7", "X1998_8", "X1998_9", "X1998_10", "X1998_11",
"X1998_12", "X1999_1", "X1999_2", "X1999_3", "X1999_4", "X1999_5",
"X1999_6", "X1999_7", "X1999_8", "X1999_9", "X1999_10", "X1999_11",
"X1999_12", "X2000_1", "X2000_2", "X2000_3", "X2000_4", "X2000_5",
"X2000_6", "X2000_7", "X2000_8", "X2000_9", "X2000_10", "X2000_11",
"X2000_12")
最佳答案
您可以从列名中提取月份作为变量,并通过月份变量将数据框拆分为列表,并使用 rowMeans()
函数为每个子数据框计算行平均值:
# extract the months for each column
mon <- sub(".*_(\\d+)$", "\\1", names(d)[-1])
# split the data frame by columns and calculate the rowMeans
cbind.data.frame(d[1], lapply(split.default(d[-1], mon), rowMeans))
# ID 1 2 3 4 5 6
#1 A 38.5 50.0 19.5 37.5 19.5 17.0
#2 B 48.0 90.0 28.5 10.5 35.0 23.0
#3 C 46.0 31.5 22.5 23.0 38.5 30.0
#4 D 57.5 12.0 27.5 51.5 13.5 38.5
关于r - 获取每个人的每第 n 列的总和,并在 r 中创建新的数据框,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/41275413/
我需要您在以下方面提供帮助。近一个月来,我一直在阅读有关任务和异步的内容。 我想尝试在一个简单的 wep api 项目中实现我新获得的知识。我有以下方法,并且它们都按预期工作: public Htt
我的可执行 jar 中有一个模板文件 (.xls)。不需要在运行时我需要为这个文件创建 100 多个副本(稍后将唯一地附加)。用于获取 jar 文件中的资源 (template.xls)。我正在使用
我在查看网站的模型代码时对原型(prototype)有疑问。我知道这对 Javascript 中的继承很有用。 在这个例子中... define([], function () { "use
影响我性能的前三项操作是: 获取滚动条 获取偏移高度 Ext.getStyle 为了解释我的应用程序中发生了什么:我有一个网格,其中有一列在每个单元格中呈现网格。当我几乎对网格的内容做任何事情时,它运
我正在使用以下函数来获取 URL 参数。 function gup(name, url) { name = name.replace(/[\[]/, '\\\[').replace(/[\]]/,
我最近一直在使用 sysctl 来做很多事情,现在我使用 HW_MACHINE_ARCH 变量。我正在使用以下代码。请注意,当我尝试获取其他变量 HW_MACHINE 时,此代码可以完美运行。我还认为
关闭。这个问题不符合Stack Overflow guidelines .它目前不接受答案。 关闭 9 年前。 要求提供代码的问题必须表现出对所解决问题的最低限度的理解。包括尝试过的解决方案、为什么
由于使用 main-bower-files 作为使用 Gulp 的编译任务的一部分,我无法使用 node_modules 中的 webpack 来require 模块code> dir 因为我会弄乱当
关闭。这个问题需要更多focused .它目前不接受答案。 想改进这个问题吗? 更新问题,使其只关注一个问题 editing this post . 关闭 5 年前。 Improve this qu
我使用 Gridlayout 在一行中放置 4 个元素。首先,我有一个 JPanel,一切正常。对于行数变大并且我必须能够向下滚动的情况,我对其进行了一些更改。现在我的 JPanel 上添加了一个 J
由于以下原因,我想将 VolumeId 的值保存在变量中: #!/usr/bin/env python import boto3 import json import argparse import
我正在将 MSAL 版本 1.x 更新为 MSAL-browser 的 Angular 。所以我正在尝试从版本 1.x 迁移到 2.X.I 能够成功替换代码并且工作正常。但是我遇到了 acquireT
我知道有很多关于此的问题,例如 Getting daily averages with pandas和 How get monthly mean in pandas using groupby但我遇到
This is the query string that I am receiving in URL. Output url: /demo/analysis/test?startDate=Sat+
我正在尝试使用 javascript 中的以下代码访问 Geoserver 层 var gkvrtWmsSource =new ol.source.ImageWMS({ u
API 需要一个包含授权代码的 header 。这就是我到目前为止所拥有的: var fullUrl = 'https://api.ecobee.com/1/thermostat?json=\{"s
如何获取文件中的最后一个字符,如果是某个字符,则删除它而不将整个文件加载到内存中? 这就是我目前所拥有的。 using (var fileStream = new FileStream("file.t
我是这个社区的新手,想出了我的第一个问题。 我正在使用 JSP,我成功地创建了 JSP-Sites,它正在使用jsp:setParameter 和 jsp:getParameter 具有单个字符串。
在回答 StoreStore reordering happens when compiling C++ for x86 @Peter Cordes 写过 For Acquire/Release se
我有一个函数,我们将其命名为 X1,它返回变量 Y。该函数在操作 .on("focusout", X1) 中使用。如何获取变量Y?执行.on后X1的结果? 最佳答案 您可以更改 Y 的范围以使其位于函
我是一名优秀的程序员,十分优秀!