x <- 1:10 # x に1から10いれてあるとして
for (i in 1:length(x)){ # 1からxの要素数までの範囲について、順に i にいれていく。
cat(x[i],"\n") # 要素番号を指定してxの要素につづけて、改行記号を出力していく。
}
1
2
3
4
5
6
7
8
9
10
matrixを使わずに、インデックスを二つ(i, j)使い、ループを二重にして、listと同じ処理をする。
1)ベクトル c() Perlでいう配列
2)行列 matrix() Perlでいう2次元配列
matrix(1:6, nrow=2, ncol=3)
matrix(1:6, 2, 3)
3)配列 array() Perlでいう多次元配列
arrray(要素, 次元)
4)リスト list() データをまとめたもの(オブジェクト)
一連のものを複数に条件分けしていく。
for (){
if(){
}else{
}else{
}else{
}
}
seq(開始値, 終止値, by=間隔値)
> seq(0, 3, by=0.5)
[1] 0.0 0.5 1.0 1.5 2.0 2.5 3.0
x <- 1:10
i <- 1
while(i <= length(x)){
if(x[i] %% 2 == 0){
cat(x[i], " is EVEN.\n")
}
else{
cat(x[i], " is ODD.\n")
}
i <- i + 1
}
●forを使って
i <- 0
x <- 10:20
x
length(x)
for (i in 1:length(x)){
if ( x[i] %% 2 == 0){
cat(x[i], " is EVEN.\n")
}
else{
cat(x[i], " is ODD.\n")
}
}
return(i)で、値を返して終わる。
for (i in 1:length(x)){ # 1からxの要素数までの範囲について、順に i にいれていく。
cat(x[i],"\n") # 要素番号を指定してxの要素につづけて、改行記号を出力していく。
}
1
2
3
4
5
6
7
8
9
10
matrixを使わずに、インデックスを二つ(i, j)使い、ループを二重にして、listと同じ処理をする。
1)ベクトル c() Perlでいう配列
2)行列 matrix() Perlでいう2次元配列
matrix(1:6, nrow=2, ncol=3)
matrix(1:6, 2, 3)
3)配列 array() Perlでいう多次元配列
arrray(要素, 次元)
4)リスト list() データをまとめたもの(オブジェクト)
一連のものを複数に条件分けしていく。
for (){
if(){
}else{
}else{
}else{
}
}
seq(開始値, 終止値, by=間隔値)
> seq(0, 3, by=0.5)
[1] 0.0 0.5 1.0 1.5 2.0 2.5 3.0
x <- 1:10
i <- 1
while(i <= length(x)){
if(x[i] %% 2 == 0){
cat(x[i], " is EVEN.\n")
}
else{
cat(x[i], " is ODD.\n")
}
i <- i + 1
}
●forを使って
i <- 0
x <- 10:20
x
length(x)
for (i in 1:length(x)){
if ( x[i] %% 2 == 0){
cat(x[i], " is EVEN.\n")
}
else{
cat(x[i], " is ODD.\n")
}
}
return(i)で、値を返して終わる。