setwd("c:/users/zmj/desktop")
chuli=read.csv("chuli.csv")
library(stringr)
sfz<-chuli[,1]
sfzdata=as.numeric(str_sub(sfz,7,14))
sfz2=2019-floor(data/10000)
***=as.numeric(str_sub(sfz,-2,-2))
***gender<-na
gender[***%%2==0]="女"
gender[***%%2==1]="男"
output=data.frame(data,sfz2,gender)
write.csv(output,file = "output.csv")
首先通過stringr包中的str_sub擷取身份證的7-14位數字,這樣就可以獲得出生年月。
data=as.numeric(str_sub(sfz,7,14))
計算年齡我是直接用出生年月/10000,取下限計算年份,
sfz2=2019-floor(data/10000)
也可以直接在身份證上面擷取年份
sfz2=2019-str_sub(sfz,7,10)
最後是性別,我只用判斷身份證倒數第二位是奇數還是偶數即可,這裡我只想得到模運算,算餘數
gender[***%%2==0]="女"
gender[***%%2==1]="男"
JS通過身份證號碼獲取出生年月日
這裡我們講述一下關於jq根據身份證號碼計算出生日期 年齡 性別,有需要的同學可參考一下。如下 複製 獲取輸入身份證號碼 var uusercard uusercard val 獲取出生日期 10 uusercard.substring 10,12 uusercard.substring 12,14 ...
java通過身份證號碼獲取出生日期 性別 年齡
1 第 一 二位表示省 自治區 直轄市 特別行政區 2 第 三 四位表示市 地級市 自治州 盟及國家直轄市所屬市轄區和縣的彙總碼 其中,01 20,51 70表示省直轄市 21 50表示地區 自治州 盟 3 第 五 六位表示縣 市轄區 縣級市 旗 01 18表示市轄區或地區 自治州 盟 轄縣級市 2...
java通過身份證號碼獲取出生日期 性別 年齡
15位 6位位址碼 6位出生年月日 900101代表1990年1月1日出生 3位順序碼1 第 一 二位表示省 自治區 直轄市 特別行政區 2 第 三 四位表示市 地級市 自治州 盟及國家直轄市所屬市轄區和縣的彙總碼 其中,01 20,51 70表示省直轄市 21 50表示地區 自治州 盟 3 第 五...