используя функцию R в фазе уменьшения - PullRequest
0 голосов
/ 29 сентября 2019

Я пытаюсь найти коэффициент корреляции фрейма данных и работает отлично.

Есть ли проблема при поиске коэффициента корреляции из фрейма данных с помощью cor (), или это хорошо для реализации этого кода для больших данных?

cc = function(input, output = NULL){
    cc.map =  function(., v) 
    {
        data <- v[-1,]  
        data[,1:length(data)] = lapply(data[,1:length(data)], as.numeric)
        keyval("korelasi",data)

    }
    cc.reduce =function(k, v ) 
    {
        keyval(k, cor(v))
    }
    mapreduce(
        input = input ,
        output = output,
        input.format = make.input.format("csv",sep=",",fill = TRUE,stringsAsFactors=FALSE),
        map = cc.map,
        reduce = cc.reduce,
        combine = T)}
...