-
-1 votesanswersviews
R *应用向量作为输入;矩阵作为输出
为了拥有一个矩阵，我想'd like to apply over each element of a vector, a function that outputs a vector. After applying the function to each element of that vector, I should have many vectors, which I' . 代码应该等同于以... -
0 votesanswersviews
基于一列的条件对数据帧进行子集化[重复]
这个问题在这里已有答案： Filter data.frame rows by a logical condition 8个答案 我有一个很大的数据框架 . 我想根据一列值的条件制作一个子集 . 说： a<-data.frame(x=rep(1:5,5),y=rnorm(25),z=runif(25)) 我想根据列 x 的值创建一个子集 . 例如，获取 x=c(2,3,5) 的值并创建另一... -
11 votesanswersviews
基于另一个数据帧/列表在数据帧中子集一列
我有以下 table1 ，这是一个由6列和8083行组成的数据框 . 下面我显示了这个 table1 的头部： |gene ID | prom_65| prom_66| amast_69| amast_70| p_value| |:--------------|---------:|---------:|---------:|---------:|---------:... -
2 votesanswersviews
当我们使用自定义函数对groupby的结果应用时，不会传递所有列
创建一个DataFrame， x_df = pd.DataFrame({'a': [1,2,3,4,5,6], 'b': [1,2,1,2,1,2], 'c': ['x','x','y','y','z','z']}) Out[56]: a b c 0 1 1 x 1 2 2 x 2 3 1 y 3 4 2 y 4 5... -
0 votesanswersviews
在data.table中逐行应用函数;将列名称作为向量传递
考虑一个函数 foo ，如下所示 . foo <- function(a, b, c) { out <- (sum(a) + sqrt(prod(c))) / sqrt(pi * b) return(out) } 我想将函数应用于 data.table DT ，其中列中的数据作为参数，根据唯一键列 ID 逐行 . DT <- structure(list(ID = ... -
1 votesanswersviews
使用apply函数将选定的列从POSIXct转换为具有特定格式的Date
偶尔，我会将Microsoft Excel中的数据读入R.在Excel中，日期变量的格式正确（例如2017年12月31日） . 读入R后，相同的日期变量将转换为另一种格式（例如2017-12-31） . 我的数据框样本（在读入R之后）如下所示： df <- structure(list(ID = c("001", "002", "003&qu... -
1 votesanswersviews
Z单独转换R中的3D阵列列表中的每个切片
我有一个包含14个三维数组的列表（参见下面的扩展） . 每个数组代表一个气候模型 . 它们包含4个不同气候参数（= 4个切片）的欧氏距离值（385x373） . 我的目标是： 为每个气候模型找到10个网格点，其中所有气候参数最适合，即最小的欧氏距离 . 因此，我想分别对所有14x4切片（=气候参数）进行z变换 . 之后，我想在4个气候参数上对z变换值进行平均，这样每个气候模型都... -
98 votesanswersviews
将函数应用于矩阵或数据框的每一行
假设我有一个n乘2的矩阵和一个以2向量作为其参数之一的函数 . 我想将函数应用于矩阵的每一行并得到一个n向量 . 在R中如何做到这一点？ 例如，我想在三个点上计算2D标准正态分布的密度： bivariate.density(x = c(0, 0), mu = c(0, 0), sigma = c(1, 1), rho = 0){ exp(-1/(2*(1-rho^2))*(x[1]^2/s... -
1 votesanswersviews
其中R中的函数用于我的计算
我有一个数据框，其中数据中的每一行代表足球比赛中的对决 . 以下是删除了一些列的摘要，仅适用于一季中的50场比赛： dput(mydata) structure(list(home_id = c(75L, 323L, 607L, 3627L, 3645L, 641L, 204L, 111L, 287L, 179L, 1062L, 292L, 413L, 275L, 182L, 3639L, 1... -
0 votesanswersviews
舍入汇总函数导致错误
尝试使用 rockchalk 包中的 summarize 输出汇总统计信息 . 希望统计数据四舍五入为2位小数 . 在 summarize 上使用 round 时收到错误消息 . library(rockchalk) M1 <- structure(c(0.18, 0.2, 0.24, 0.35, -0.22, -0.17, 0.28, -0.28, -0.14, 0.03, 0.87, -... -
2 votesanswersviews
R.计算与其他列的双重类别关联的列中的特定字符 . 基于频率箱迭代地进行
我有一个巨大的数据帧df1，它的过度简化版本由3列组成，“Words”，“Frequency”和“Letters”： Words Frequency Letters flower/tree 0.15 a(0.1) tree 0.67 a(0.4) planet 0.85 b(0.4) ... -
1 votesanswersviews
R：将计算列添加到数据帧列表中
我有两个数据框列表 . 我想在第一个列表上进行一些计算，然后将结果应用到第二个列表 # first list df1 <- data.frame(id=1:5, score=c(rep(1, 3), rep(0, 2))) df2 <- data.frame(id=1:5, score=c(rep(1, 4), rep(0, 1))) df1 id score 1 1 ... -
1 votesanswersviews
将矢量的所有元素（包含9个元素）除以来自另一个矢量的第一，第二，......百分之一元素（包含100个元素）
您好我真的需要R中的程序帮助 . 我有9个元素的向量，我需要将每个元素除以第一个，第二个，......，百分之一，来自另一个向量的元素 . 我尝试这个循环，但它不起作用 er=matrix(1,100) LCZ2016=matrix(1,100) for(i in 2:100) for(j in 1:9) { { er[i]=rnorm(1, 0, SdeLcCZ20... -
2 votesanswersviews
Pandas vectorization：计算满足条件的每个组的分数
假设我们有一张顾客及其消费表 . import pandas as pd df = pd.DataFrame({ "Name": ["Alice", "Bob", "Bob", "Charles"], "Spend": [3, 5, 7, 9] }) LIMIT... -
0 votesanswersviews
如何使用Dataframe列表列表
我不确定这是否可行，甚至不知道如何获得以下R问题的良好解决方案 . 数据/背景/结构：我收集了一个基于项目的合作数据的大数据集，它将特定项目映射到参与公司（这可以理解为社交网络分析的双边边缘列表） . 由于分析原因，建议将整个数据集子集化为不同位置和时间段的不同子集 . 因此，我创建了以下数据结构 sna.location.list [[1]] (location1) ... -
1 votesanswersviews
使用应用函数代替R中的For循环
我在R中继续前进，并且在第一次成功地使用lapply加载一个名为ImportData（）的函数中的文件 . 工作职能是： AllData <- lapply(files, function(i){ read.csv(i, stringsAsFactors = FALSE) }) AllData是包含4个数据帧的列表 . 在未来，它将包含更多 . 函数中还有两个for循环，我想用... -
2 votesanswersviews
方案环境模型关闭问题
SICP 3.2引入环境模型来取代替代模型 . 我在学习这部分时做了以下测试： (define a1 1) (define (f1) a1) (f1) ; return 1 (define (f2) (define a1 2) a1) (f2) ; return 2 (define (f3) (define a1 2) (f1)) (f3) ; return 1，not 2 最后一个表达超出了我... -
5 votesanswersviews
R：将函数应用于矩阵，其中向量元素作为参数
假设我想将一个函数应用于矩阵的每一行 . 函数的一个参数采用向量 . 我想将向量的第一个元素应用于第一行，将第二个元素应用于第二行，等等 . 例如： set.seed(123) df<-matrix(runif(100), ncol=10) var2 <- c(1:10) MYFUNC <- function(x, Var=NA){ sum(x)/Var } 我试过... -
0 votesanswersviews
如何将“2D”矢量转换为数据帧/矩阵？ [R]
嗨我将一个函数应用于数据框的每一列，并为每列返回一个列表 . 现在我想将此列表转换为矩阵或数据框 . 已阅读this nice post但仍有一些问题 . df = data.frame(name = c('Tom', 'Mark', 'Jane'), weight = c(150, 140, 110), sex = c('M', 'M', 'F')... -
0 votesanswersviews
Cor.test到数据框中的变量子集
我是R的新手，我正在寻找一种方法将cor.test有选择地应用于数据框中的一组变量 . 我自己制作了一个小脚本来查看，然后从cor（数据帧）结果中选择一组相关性 . 我接下来要做的是对所有这些具有绝对值大于X的系数的结果运行cor.test . 我的剧本 sortedcorlist <- function(mydataframe,method,numtoreport) { vahe... -
42 votesanswersviews
将函数应用于数据框中的每个列，观察每个列的现有数据类型
我正在尝试获取大型数据框中每列的最小值/最大值，作为了解我的数据的一部分 . 我的第一次尝试是： apply(t,2,max,na.rm=1) 它将所有内容视为字符向量，因为前几列是字符类型 . 因此，一些数字列的最大值将显示为 " -99.5" . 然后我尝试了这个： sapply(t,max,na.rm=1) 但它抱怨最大因素没有意义 . （ lapply 是一样的... -
0 votesanswersviews
使用Apply功能控制
我被要求执行以下操作：打印 AtmWtAg.wide 的 summary . 使用apply系列中的函数（ apply ， tapply ， lapply ， sapply ）和相应的R函数来计算一组类似的值（逐列平均值，中值，最小值，最大值和分位数） . 请注意，此格式的每列都是来自单台机器的观察 . AtmWtAf.wide的数据如下所示： 1 2 1 107.86... -
0 votesanswersviews
将函数应用于tibble中的每个值（并返回一个tibble）？
这里直截了当，但大多数关于apply / plyr / dplyr的文档都在解释更复杂的操作 .我想从 this_tbl 创建一个新的tibble > this_tbl # A tibble: 3 x 2 x y <dbl> <dbl> 1 42 999 2 0 0 3 1 0 这样每个值> 0... -
2 votesanswersviews
如何使用mutate按行创建变量应用函数
我有一个数据框，我想创建一个新的变量应用一个在行内工作的函数 . 请参阅下面的示例 . library(tidyverse) n <- 100 z0 <- data.frame(A = sample(c("y","n",NA), n, replace = T, prob = c(.4,.4,.1)), B = ... -
3 votesanswersviews
Scala应用方法调用作为括号与隐式参数冲突
Cay Horstmann的书“Scala for the Impatient”中有关于apply方法的注释： 偶尔，（）表示法与另一个Scala功能冲突：隐式参数 . 例如，表达式“Bonjour”.sorted（3）会产生错误，因为可以选择使用排序调用排序方法，但3不是有效排序 . 解决方案是将 "Bonjour".sorted 分配给变量并对其调用apply，例如： ... -
2 votesanswersviews
双循环矩阵代替使用循环R.
我是使用apply / purrr函数的新手 . 我不知道何时以及如何使用此功能 . 我有矩阵的双循环，我想避免它们 . 有一种方法可以做到吗？我必须做这个操作（见下面的代码） NCols=4 NRows=4 set.seed(1234) myMat<-matrix(runif(NCols*NRows), ncol=NCols) myMat norm=matrix(0,NRows,NCo... -
0 votesanswersviews
在列表中的列表上操作，将结果存储在全局环境中
我正在使用鼠标 library(mice) 来估算大量的数据库 . 我编写了一个代码，用于对我的全局环境中的所有数据帧进行估算 . 这个练习的结果是一个名为 dfmice 的大型列表 . 对于列表中的每个列表，我想使用鼠标的 complete 操作手动我可以通过执行以下操作来执行此操作： list1 <- list(a = 2, b = 3) list2 <- list(c = &qu... -
-2 votesanswersviews
将函数应用于每个data.frame行并更新多个列值
我有一个data.frame，其中每一行都是一条推文，每一行都是一个属性（“text”，“user”等） . 我编写了一个函数“processTweet（）”，它接受data.frame的一行并更改tweet中的3列（“X”，“Y”和“Z”）并返回此修改后的单行data.frame . 我目前正在尝试找出如何使用类似dplyr或类似应用的函数来实际反映原始data.frame中的这些修改 . 我... -
0 votesanswersviews
R ddply dcast替代？
我想将数据（data.frame）从长格式转换为宽格式，并将“ITEM”的值作为列和值（“ITEM2”）（见下文）： 长格式： 宽幅： 因此我使用包reshape2中的dcast函数： df <= dcast(df,SEQUENCEID + EVENTID ~ ITEM, value.var="ITEM2") 这样做一切正常 . 但是在我的数据框中有7m的数据记录，... -
0 votesanswersviews
R：从矩阵到列表到矩阵：订单问题
我有一个问题，在过去的四个小时里，我无法解决问题，所以我想知道你是否有人可以帮助我 . 要查看我的问题，让我们从一个示例开始： tmp <- matrix(1:24, ncol=2) fac <- rep(1:5, length.out=12) 基于因子水平 fac ，我想将函数应用于共享相同因子水平的 tmp 的所有元素 . 我最终使用 by ，但如果这不合适，请不要犹豫，指出来 ...