R语言计算频数和频率

首先,筛选出需要的列:

data <- data2[,which(colnames(data2) %in% c("产品分类", "期数", "逾期月数"))]
产品分类期数逾期月数
委托贷款241
委托贷款361
担保贷款242
委托贷款242
信用贷款364
担保贷款243
信用贷款241
委托贷款363
担保贷款242

现在希望得到每种产品种类在不同期数时,逾期月数的占比,使用table函数:

#freq <- table(data)
freq1 <- table(data[which(data$逾期月数 == 1),])

如果希望算出的频数参与后续的计算,那么需要把table格式的数据转化成本人比较熟悉的数据框格式:

table1 <- as.data.frame(matrix(freq1[1:length(freq1)],nrow = length(row.names(freq1)), ncol = length(colnames(freq1))))
row.names(table1) <- row.names(freq1)
colnames(table1) <- colnames(freq1)

如果希望算出频率,而不是频数的话,需要用到函数prop.table:

table2 <- prop.table(freq1)

函数的参数1代表行,2代表列。

评论 1
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值