0
Whileを使用して得られた反復をrでプロットし、catで結果を取得します。データフレームの結果をプロットするにはどうすればよいですか?catの結果をrのデータフレームに変換
おそらくf <- 5
n <- 0
while(f > 0.001)
{
n <- n + 1
f <- f/n
cat(f,n,"\n")
}
Whileを使用して得られた反復をrでプロットし、catで結果を取得します。データフレームの結果をプロットするにはどうすればよいですか?catの結果をrのデータフレームに変換
おそらくf <- 5
n <- 0
while(f > 0.001)
{
n <- n + 1
f <- f/n
cat(f,n,"\n")
}
あなたがcat
を使用する必要が何らかの理由はありますか?あなたはそれなしでこれを達成することができます
f <- 5
n <- 0
results <- data.frame(n = n, f = f)
while(f > 0.001) {
n <- n + 1
f <- f/n
results <- rbind(results, c(n, f))
}
基本的に、あなたはdataframe
を開始し、その後、ループのすべての実行のためにそれに行を追加します。
ない最も効率的な方法が、動作します:
f <- 5
f_vector <-f
n <- 0
n_vector <- n
results =data.table(n,f)
while(f > 0.001)
{
n <- n + 1
n_vector=c(n,n_vector)
f <- f/n
f_vector=c(f,f_vector)
cat(f,n,"\n")
}
result=data.table(n_vector,f_vector)