求R中小数的平均值

求R中小数的平均值,r,R,我像这样从CSV文件导入数据 x <- c(read.csv(file="FX.csv", sep=";", header = FALSE, dec=",")) sapply(x, typeof) 警告信息: 默认值(x):参数不是数字或逻辑参数:返回NA 这是有意义的,因为给定的数据类型是双精度的。有人能帮我得到小数数据的平均值吗?这就是我的数据 x $V1 [1] 0.01 0.00 0.02 0.00 0.01 0.04 -0.02 0.00 0.

我像这样从CSV文件导入数据

x <- c(read.csv(file="FX.csv", sep=";", header = FALSE, dec=","))
sapply(x, typeof)
警告信息: 默认值(x):参数不是数字或逻辑参数:返回NA

这是有意义的,因为给定的数据类型是双精度的。有人能帮我得到小数数据的平均值吗?这就是我的数据

x    
$V1
     [1]  0.01  0.00  0.02  0.00  0.01  0.04 -0.02  0.00  0.01  0.00  0.00  0.01 -0.01 -0.02  0.01  0.00  0.00 -0.02 -0.01  0.00
    [21]  0.01  0.01 -0.03  0.00  0.03  0.00 -0.02  0.00  0.00 -0.01  0.00 -0.01 -0.02  0.00  0.00 -0.02  0.03  0.00  0.01  0.00
    [41] -0.01 -0.01  0.00  0.00 -0.02  0.00  0.00 -0.01  0.00  0.01  0.04  0.01 -0.05  0.00  0.00  0.00  0.02  0.00 -0.04 -0.01
    [61]  0.01 -0.01  0.02  0.02
以下是建议的编辑结果

sapply(x, typeof)
      V1 
"double"

str(x)
'data.frame':   64 obs. of  1 variable:
 $ V1: num  0.01 0 0.02 0 0.01 0.04 -0.02 0 0.01 0 ...

> sapply(x, class)
       V1 
"numeric" 

作为一个
列表
,您的号码存储在列表
x
v1
字段中。 要获取列表
x
v1
字段中存储的数字的平均值,请键入

   mean(x$v1) 
   #OR
   mean(x[[1]])

尝试:x编辑您的问题以包含
str(x)
的输出。另外,
typeof
返回内部存储模式。用R的说法,“数字”本质上与“双精度”相同。通常,你会做
sapply(x,class)
。尝试
mean(x[[1]])
mean(x$V1)
。。。我觉得这很可能是一个骗局,因为这很容易让人困惑。@BenBolker感谢mate的把戏:)
   mean(x$v1) 
   #OR
   mean(x[[1]])