close_btn
조회 수 9418 추천 수 0 댓글 0
?

단축키

Prev이전 문서

Next다음 문서

+ - Up Down Comment Print
?

단축키

Prev이전 문서

Next다음 문서

+ - Up Down Comment Print

#두번째 문제


coin=function(x,y){

  change=x-y

  cash=rep(NULL,6)

  money=c(50000,10000,5000,1000,500,100)

  if(change<0){print("거스름돈을 계산할수 없습니다.")}

  else if(change==0){print("거스름돈이 없습니다.")}

    else{for (i in 1:6){

      cash[i]=change%/%money[i]

      change=change-(cash[i]*money[i])

    }

    }

  cash.frame=data.frame(cash, row.names = c(50000,10000,5000,1000,500,100))

  colnames(cash.frame)="갯수"


   print(cash.frame)

  }

과제풀이 : 두번째 과제를 해결하기 위해서 1주차 교육때 배운 if문과 for문을 이용하여 코드를 구성하였습니다.  
거스름돈 문제를 해결하기 위해서, 우선 돈의 차이를 먼저 change 라는 변수로 지정을 하였습니다. 그 후에 돈의 차이가 음수거나, 0일 경우에 "거스름돈을 계산할 수 없습니다." 또는 "거스름돈이 없습니다."라고 출력을 하도록 if문을 사용했습니다. 위의 조건에 해당하지 않을 경우에는 else로 넘어가서  두 금액의 차이에서 거스름돈을 계산하게 되는데요. 
이때 money=c(50000,10000,5000,1000,500,100)라고 지정해준 변수에서 for 문을 사용하여 두 금액인 change에서 money에 해당하는 금액을 나눠서 그 몫을 다시 change에서 뺄 수 있도록 반복문을 사용하였습니다.
마지막으로 출력할 경우에 print(cash)해도 각각의 거스름돈에 해당하는 몫이 나오지만, 좀 더 깔끔하게 출력하고자 data.frame 형태를 사용해서     보다 깔끔하게 출력할 수 있도록 코드를 구성하였습니다.

List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 우수 코드 게시판 이용 관련 공지사항 DataMarket 2014.05.21 39655
53 투빅스 5&6기 2주차과제 1번 회귀분석 -6기 한동훈 2 file 투빅스6기한동훈 2016.08.04 11245
52 투빅스 5&6기 2주차 과제 2번 마방진 만들기 - 6기 임진주 4 file 진주 2016.08.04 10959
» 투빅스 5&6기 1주차 과제 2번 재석 2016.07.28 9418
50 5&6기 1주차 과제 1번 - 6기 이윤섭 겨뽀 2016.07.28 10123
49 투빅스 5&6기 1주차 과제코드 Alan 2016.07.27 9558
48 크롤링 - 전국 이디야 매장정보를 중심으로 (5기 이승은) 2 file 켜져있는멀티탭 2016.03.26 26750
47 crawling - 5기 이제형 4 trevor 2016.03.24 14413
46 PCA (주성분 분석) - 5기 이제형 trevor 2016.03.09 14750
45 NBA data 회귀분석 / Adult data 로지스틱 회귀분석, 나이브베이즈, 의사결정나무 - 5기 정현재 2 file 정현재 2016.03.03 17937
44 NBA 회귀분석 / adult 로지스틱회귀, 나이브베이즈, 의사결정나무 - 5기 최도현 3 file 알빈 2016.03.03 20271
43 K-Means Funtion (5기 이제형) 3 trevor 2016.02.25 13734
42 박이삭_기초스터디__반복문 및 apply함수 및 데이터프레임다루기 지니상 2016.02.12 10685
41 최도현_기초스터디_R기초 지니상 2016.02.12 11377
40 양우식_기초스터디_dplyr_sqldf 지니상 2016.02.12 12171
39 이정민_기초스터디_stringr패키지 지니상 2016.02.12 17660
38 고가영_기초스터디_파일불러오기 및 Rmarkdown 지니상 2016.02.12 13563
37 입출금 처리 프로그램 (4주차 과제) - 5기 방정훈 file Alan 2016.02.10 12430
36 연관성 분석(3주차 과제) & KNN 함수만들기(3주차 과제) - 4기 김선지 순지 2016.02.09 13667
35 연관성 분석(3주차 과제) - 5기 이정민 1 file 쩡마 2016.02.07 14118
34 KNN 함수만들기 (3주차 과제) - 5기 방정훈 Alan 2016.02.03 14394
Board Pagination ‹ Prev 1 ... 2 3 4 5 6 7 ... 8 Next ›
/ 8

나눔글꼴 설치 안내


이 PC에는 나눔글꼴이 설치되어 있지 않습니다.

이 사이트를 나눔글꼴로 보기 위해서는
나눔글꼴을 설치해야 합니다.

설치 취소

Designed by sketchbooks.co.kr / sketchbook5 board skin

Sketchbook5, 스케치북5

Sketchbook5, 스케치북5

Sketchbook5, 스케치북5

Sketchbook5, 스케치북5