|
对函数进行了些许修改,使其能对NA数据正确处理,下载点这里,,
国庆前写了一个关于R语言中t检验的多核计算函数,不幸的是这个函数不仅不能有效的减少计算时间,反而将时间变为原来计算时间的10倍,堪称绝对失败的一个尝试。经过国庆期间的努力,终于修改了一个新的版本,新的版本可以有效的减少计算时间。,,函数下载地址:http://s.yunio.com/tmw8rc,

图中的1表示为单核进行计算时,不使用multicore包,后面的一次为1:8核进行计算时间。可以明显发现计算时间的减少。
#These two function are based on the package “multicore”
#It can be reduce your cost efficiently when you run t-test for bulk data
sc.t.test
{
if(!is.vector(data) & !is.matrix(data)) stop(“Need a vector or a matrix…”)
if(length(data) != floor(length(data)/2)*2) stop(“There is odd number…”)
if(is.vector(data))
{
k
}
if(is.matrix(data))
{
k
for(i in 1:length(data[,1]))
{
k
}
}
return(k)
}
mc.t.test
{
p
k
mc.core
for( i in 1:mc.core)
{
length
start
end
if (end >= length(data[,1])) end = length(data[,1])
if (start >= length(data[,1])) start = length(data[,1])
if(start != end ) {p
if(end == length(data[,1])) break
}
result
attributes(result)
return(result)
}
,
转载请注明:数据分析 » R语言 t检验多核并行运算 v1.2_ r语言 t检验 |
|