loop문

■ R에서의 loop 문

 

문법예제:

for(루프변수 in 리스트) {

반복할 문장

     }

 

예제:

aaa<-function(x){
+   for (i in 1:x) {
+     print(i)
+   }
+ }
> aaa(3)
[1] 1
[1] 2
[1] 3

 

 

 

 

문제182.

아래의 파이썬 코드를 R코드로 변환하시오

 

import  csv

file = open("d:\\emp2.csv",'r')

emp_csv = csv.reader(file)

a = []

for  emp_list in emp_csv:

    a.append(emp_list[5])

print(a)  

[5000, 2850, 2450, 2975, 1250, 1600, 1500, ...]

↓

x<-c() # 빈 백터 하나 만들어줌

for(i in 1:length(emp$sal)) #range 시키려면 1:length

x[i]<-emp$sal[i]

x

[1]  800 1600 1250 2975 1250 2850 2450 3000 5000 1500 1100  950
[13] 3000 1300 3200

 

data.table(x)