R语言:计算现金工资的币数

时间:2023-03-08 19:59:00
R语言:计算现金工资的币数

新入职的员工,有的没有相应银行卡,需要计算现金工资的币数。实发工资,一般取整数。

简化计算,纸币面值只有100、10、1。4278除以100等于42余78,78除以10等于7余8,8除以1等于8。

复杂计算,纸币面值有100、50、20、10、5、1。4278除以100等于42余78,78除以50等于1余28,28除以20等于1余8,8除以10等于0余8,8除以5等于1余3,3除以1等于3。

R语言中,向下取整为%/%,取余为%%。

思路一取整配合取余。

思路二取整配合减法。4278%/%100=42,4278%/%10-(4278%/%100)*10=7,4278%/%1-(4278%/%10)*10=8。

7%/%5=1,(7-1*5)%/%2=1,7-1*5-1*2=0。

8%/%5=1,(8-1*5)%/%1=3。

思路三取余配合减法。4278%%100=78,(4278%%100)%%50=28,((4278%%100)%%50)%%20=8,(((4278%%100)%%50)%%20)%%10=8,((((4278%%100)%%50)%%20)%%10)%%5=3。

(78-28)/50=1,(28-8)/20=1,(8-8)/10=0,(8-3)/5=1。

Excel中向下取整为int,取余为mod。

在腾讯电脑管家配套的软件管理中搜索,R语言版本为2016年4月的3.2.5。