admin管理员组

文章数量:1487745

3行R语言代码绘制泄漏密码直方图

根据网上的统计，把密码次数存成以下格式

"Word" "Freq" "1" "123456789" 81839 "2" "12345678" 75513 "3" "11111111" 27157 "4" "dearbook" 18788 "5" "00000000" 12309 "6" "123123123" 6850 "7" "1234567890" 6150 "8" "88888888" 5318 "10" "111111111" 2506 "11" "147258369" 2081 "12" "987654321" 1995 "13" "aaaaaaaa" 1902 "14" "66666666" 1819 "15" "1111111111" 1804 "16" "xiazhili" 1663 "17" "11223344" 1501 "18" "a123456789" 1485 "19" "1qaz2wsx" 1300 "20" "qqqqqqqq" 1241

然后执行R代码

代码语言：javascript代码运行次数：0运行复制
dt<-read.table("pass.txt", sep = " ",header=T,strip.white = TRUE,blank.lines.skip=FALSE,fill=TRUE,comment.char = "");
par(las=2,xpd = TRUE,xaxt="n",mar=c(3, 6, 3, 3));
barplot(dt$Freq[20:1],main="常用密码",names.arg = dt$Word[20:1],horiz=T,col=rev(heat.colors(length(dt$Freq[1:20]))));

结果如下：

本文参与 腾讯云自媒体同步曝光计划，分享自作者个人站点/博客。 原始发表：2024-10-11，如有侵权请联系 cloudcommunity@tencent 删除dtword统计

本文标签： 3行R语言代码绘制泄漏密码直方图

版权声明：本文标题：3行R语言代码绘制泄漏密码直方图 内容由网友自发贡献，该文观点仅代表作者本人， 转载请联系作者并注明出处：http://www.betaflare.com/shuma/1754903952a3181084.html， 本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，一经查实，本站将立刻删除。