close_btn
조회 수 9758 추천 수 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 41264
87 투빅스 7&8기 6주차 과제 TF-IDF 문서유사도 측정 - 8기 최서현 최서현 2017.08.31 8103
86 투빅스 7&8기 5주차 과제 Selenium Crawling - 8기 김강열 김강열 2017.08.24 7365
85 투빅스 7&8기 5주차 과제 Image Augmentation - 8기 김민정 김소희 최수정 황다솔 file 민정e 2017.08.24 7262
84 투빅스 7&8기 5주차 과제 Beautiful Soup 이용한 Crawling - 8기 류호성 file 류호성 2017.08.24 7293
83 투빅스 7&8기 4주차 과제 tree, RF, bagging, boosting 이용 분석 - 8기 조양규 file dial123 2017.08.17 7632
82 투빅스 7&8기 4주차 과제 의사결정나무&랜덤포레스트 - 8기 김강열 김강열 2017.08.17 7575
81 투빅스 7&8기 3주차 과제 클러스터링 구현 - 8기 권문정 김강열 이현경 조양규 1 이현경 2017.08.10 8184
80 투빅스 7&8기 3주차 과제 PCA - 8기 이현경 file 이현경 2017.08.12 7191
79 투빅스 7&8기 2주차 과제 연관성 분석 - 8기 조양규 file dial123 2017.08.03 8345
78 투빅스 7&8기 2주차 과제 나이브베이즈 구현 - 8기 이현경 file 이현경 2017.08.03 8125
77 투빅스 7&8기 2주차 과제 로지스틱/Ridge/Lasso&알고리즘 - 8기 김강열 file 김강열 2017.08.03 7797
76 투빅스 7&8기 1주차 과제 알고리즘 - 8기 김강열 file 김강열 2017.07.27 7424
75 투빅스 7&8기 1주차 과제 회귀분석 - 8기 황다솔 file 다솔 2017.07.27 7637
74 투빅스 6&7기 8주차 과제 PCA(주성분 분석) - 7기 이동수 1 탱탱볼 2017.03.18 10321
73 투빅스 6&7기 8주차 과제 LBP 알고리즘 구현 - 7기 이광록 1 file 2017.03.16 9554
72 투빅스 6&7기 8주차 과제 SVM - 7기 이광록 1 file 2017.03.16 10342
71 투빅스 6&7기 6주차 과제 소멸언어 분류 예측 데이터분석 - 이동수(7기) 2 file 탱탱볼 2017.03.02 11957
70 투빅스 6&7기 5주차 과제 의사결정나무&앙상블 - 7기 최희정 2 file 히둥 2017.02.23 15496
69 투빅스 6&7기 4주차 과제 K-means 분석 및 구현 - 7기 이광록 2 2017.02.19 11069
68 투빅스 6&7기 4주차 과제 KNN 구현 - 전종섭(7기) 2 뻐엉 2017.02.16 10906
Board Pagination ‹ Prev 1 ... 2 3 4 5 6 7 8 9 ... 10 Next ›
/ 10

나눔글꼴 설치 안내


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

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

설치 취소

Designed by sketchbooks.co.kr / sketchbook5 board skin

Sketchbook5, 스케치북5

Sketchbook5, 스케치북5

Sketchbook5, 스케치북5

Sketchbook5, 스케치북5