deal <- function(){
card <- deck[1, ]
assign("deck", deck[-1, ], envir = globalenv())
card
a <- deck$suit
if (a == "joker"){
"도둑"
}else if (a == "diamonds"){
"다이아몬드"
}else if (a == "hearts"){
"하트"
}
else if (a == "clubs"){
"클로버"
}else {
"스페이드"
}}
'data.frame': 19 obs. of 3 variables:
$ face : Factor w/ 14 levels "ace","eight",..: 10 5 11 4 14 14 1 10 9 3 ...
$ suit : Factor w/ 5 levels "clubs","diamonds",..: 5 1 3 1 3 2 2 2 5 2 ...
$ value: int 7 11 6 4 2 2 1 7 12 5 ...
| |
|
제가 간단한거 하나만들려구하는데 deal()이라는 함수를 구동시키면
Warning messages:
1: In if (a == "joker") { :
the condition has length > 1 and only the first element will be used
2: In if (a == "diamonds") { :
the condition has length > 1 and only the first element will be used
3: In if (a == "hearts") { :
the condition has length > 1 and only the first element will be used
4: In if (a == "clubs") { :
the condition has length > 1 and only the first element will be used
이런 에러가떠요.. roll()을 구동했을때 에러가 안나왔으면 좋겠는데..
계속 만들어보다가 함수 겨우 찾아서 만든건데 에러가뜨네요 ㅠㅠ 해결방법이나 다른함수를 써서 코딩할수있는 방법좀 알려주세요
제가 하고싶은건 한번실행할때마다 하나의결과값을 얻는것입니다. 부탁드립니다
Comment 1
-
cardiomoon
2020.05.27 08:11
No. | Subject | Author | Date |
---|---|---|---|
1254 | moonbook package mycsv 관련 오류 문의드립니다. [2] | qwetyui | 2023.11.30 |
1253 | logistic regression 명령어 문의드립니다. [2] | 로렌쵸메디치 | 2023.11.22 |
1252 | spss 파일 불러오기. [1] | 통계린 | 2023.11.22 |
1251 | PSM 매칭변수 숫자 관련 문의입니다. [1] | 오하나 | 2023.11.22 |
1250 | Multiple imputation 관련 질문 및, age adjusted incidence rate 관련 질문을 드립니다. | YSKBH | 2023.11.15 |
1249 | semMediation 설치 재문의드립니다 [3] | 마술샘 | 2023.11.11 |
1248 | 안녕하세요. 정회원 문의 [1] | lionking | 2023.11.06 |
1247 | PSM 관련 질문드립니다. | dr. | 2023.11.05 |
1246 | ggplot [1] | 통계린 | 2023.10.30 |
1245 | 정회원 [1] | 통계린 | 2023.10.29 |
1244 | PSM 관련 질문 드립니다. [2] | 로렌쵸메디치 | 2023.10.25 |
1243 | forest plot 그림이 전체가 다 나오지 않습니다. [1] | joyguni | 2023.10.08 |
1242 | PSM caliper default 값 관련 문의드립니다. [1] | Ooppps | 2023.10.05 |
1241 | reliability test tool,,, [1] | FAdavid | 2023.10.05 |
1240 | 정회원 가입 확인 요청드립니다. [1] | osman | 2023.10.03 |
1239 | 생존분석, cox 회귀 관련 기초적인 질문 입니다. | 만니톨 | 2023.09.27 |
1238 | Twang-mnps에서 매칭된 데이터를 추출하는 방법 좀 알려주세요 | Dorocy | 2023.09.26 |
1237 | 영수증 발급을 부탁드립니다. [1] | 규빈어멈 | 2023.09.26 |
1236 | 정회원 확인 [2] | lionking | 2023.09.24 |
1235 | autoReg 에러 문의드립니다 [1] | 소소 | 2023.09.23 |
a <- deck$suit 로 정의하셨으니 a는 하나의 변수가 아니라 vector입니다. a의 갯수(length)가 1이 아니라 여러개니 위와같은 warning은 당연한 것이구요.
a 라는 벡터의 첫번쨰 원소는 a[1] 이라고 하면 됩니다.
R 기본서를 읽어보셔요. R의 자료형중 벡터가 뭔지 데이터프레임이 뭔지 알아야 제데로 작동되는 함수를 만드실 수 있습니다.