R을 처음 배우느라 미숙한 부분이 많아서 질문드립니다.
x y
1 T 12000
2 T 8000
3 F 0
4 F 1000
위의 표에서 x가 T이고 y가 10000 이상인 경우 "A등급" 출력
x가 T이고 y가 10000 미만인 경우 "B등급" 출력
x가 F이고 y가 0일 경우 "C등급" 출력
x가 F이고 y가 0이 아닐 경우 "D등급" 출력
위의 조건처럼 출력을 하고싶을 때, 다음과 같은 식을 만들었습니다.
function(x,y){
if(x == TRUE){
if(y>=10000){
print("A등급")
}else{
print("B등급")}
}else{
if(y==0){
print("C등급")
}else{
print("D등급")}
}}
여기서 등급 벡터를 생성한 후, 새로운 열에 등급 벡터를 넣고 싶어서 반복문을 통해 등급 벡터를 아래와 같이 만들려고 했습니다.
그런데 값이 의도한대로 일대일대응하여 4개 나오는 것이 아니라 32개의 값이 나오는데 잘 이해가 가지않아서 질문 드립니다.
일대일 대응하여 값이 나오도록 어떻게 반복문을 수정하는 게 좋을지 궁금합니다!
x <- c("T", "T", "F", "F")
y <- c(12000, 8000, 0, 1000)
for(i in x){
for(j in y){
print(check(i,j))}
}
Comment 1
-
cardiomoon
2019.05.31 08:28
x <- c(T,T,F,F)y <- c(12000, 8000, 0, 1000)for(i in 1:4){check(x[i],y[i])}
No. | Subject | Author | Date |
---|---|---|---|
1253 | R서버 설치 문의드립니다. [4] | 화모기 | 2015.05.13 |
1252 | 초초 초보자 문의 드립니다^^ [2] | 매직하마 | 2017.12.22 |
1251 | mytable() 함수에 대한 질문입니다. [3] | 브리디온 | 2017.11.19 |
1250 | 묻고답하기 게시판을 운영합니다 [1] | cardiomoon | 2015.04.20 |
1249 | ANOVA, Kruskal-Wallis 검정 및 다중비교 [3] | 소오름 | 2016.03.31 |
1248 | ios | bnmy6581 | 2018.12.28 |
1247 | 예제 데이터 열 제목 편집방법 [2] | 신돌석 | 2016.04.25 |
1246 | rstudio 사이트에 연결할 수 없음 문제 [1] | 지원 | 2019.09.10 |
1245 | 로지스틱 회귀분석에 대해 질문 올립니다. [12] | SOL | 2017.09.15 |
1244 | Cox proportional analysis에서 subgroup분석에 대해 여쭙니다 | 김규 | 2017.09.30 |
1243 | rJava 에러 문제 해결에 대해 문의드립니다 [1] | mdhjcho | 2017.06.29 |
1242 | 3D 형태 그래프에 대해 질문드립니다. | 백지백지 | 2019.04.26 |
1241 | 메타분석의 변수지정 [1] | 야스오 | 2021.05.24 |
1240 | Logistic regression [3] | namuhanayeyo | 2017.03.02 |
1239 | 생존 분석 시 Cox-regression vs. Log-rank [2] | begabung | 2017.05.22 |
1238 | 표본설계시 subset 명령어 문의드립니다. [1] | 네잎클로바 | 2020.05.09 |
1237 | Rstudio 사용법` [3] | 방랑자 | 2015.05.02 |
1236 | Survdiff로 log-rank test 시 P-value 소수점 [3] | begabung | 2019.02.15 |
1235 | length 오류질문 [1] | 촙춉 | 2020.05.26 |
1234 | 메타분석-출판편향 [1] | 날아라 | 2019.08.26 |