r语言求平均值

Python016

r语言求平均值,第1张

如果是简单数据，数据集a中有变量：只有因变量y，没有自变量x。求y的平均值代码如下：

mean(a$y)。

如果有自变量x。就要进行如下操作：

1.导入数据

install.packages('xslx')

library(xlsx)

Sys.setlocale("LC_ALL", "zh_cn.utf-8")

a=read.xlsx2('d:/1.xlsx',1,header=F)

2.计算平均值

数据集a中有变量：因变量y，自变量x

install.packages('Rmisc')

library(Rmisc)

单因素：求y的平均值，以x为分类变量

a1=summarySE(a,measurevar='y', groupvars=c('x'))

双因素：求y的平均值，以x1和x2为分类变量

a1=summarySE(a,measurevar='y', groupvars=c('x1','x2'))

mean_24 <- function(x){

k=NULL

for(i in 24:length(x))

{k[i-23]=sum(x[seq(i-23,i)])/24}

return(k)

}

Powershell脚本求平均值：

（在Win7或以上系统中点击开始，搜索Powershell来打开Powershell控制台，然后输入以下代码）

# 下面的例子是计算1加到10的平均数：

.10 | Measure-Object -Average | Select-Object -ExpandProperty Average

# 结果输出为： 5.5