関数の結果をベクトルに出力する

Question

データセットの各行で関数を呼び出す関数を作成しました。私はベクトルとして出力をしたいと思います。下に示すように、関数は結果を画面に出力しますが、関数外で使用できるベクトルに出力をリダイレクトする方法はわかりません。

n_markers <- nrow(data) 
p_values <-rep(0, n_markers) 

test_markers <- function() 
    { 
    for (i in 1:n_markers) 
     { 
     hets <- data[i, 2] 
     hom_1 <- data[i, 3] 
     hom_2 <- data[i, 4] 
     p_values[i] <- SNPHWE(hets, hom_1, hom_2) 
     } 
     return(p_values) 
    } 

test_markers() 

Answer 1

hereからこのコードを取得しましたか？私はあなたが最初にそれを理解しようとしなかったことも心配しますが、うまくいけば間違っています。

あなたはこれを考えすぎるかもしれません。コメントで述べたように

stored_vector <- test_markers() 

しかし、あなたの関数は、おそらくに減少させることができます：単にあなたが他の機能とやるように、ベクターにあなたの関数の結果を格納

stored_vector <- sapply(1:nrow(data), function(i) SNPHWE(data[i,2],data[i,3],data[i,4]))