免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 13445 | 回复: 2

统计排序 [复制链接]

论坛徽章:
0
发表于 2013-10-11 18:25 |显示全部楼层
本帖最后由 gr33n 于 2013-10-11 14:04 编辑

各位大大好:

一个字符串, 是由字符 A, B, C, D 字符组成的。如:
ABDCDCDC

1: 按照 输入值 K值 进行分割,分割成每 K个字符 一组。如:

K = 1   A B D C D C D C 共8组
K = 2   AB DC DC DC     共4组
K = 3   ABD CDC DC      共3组

2: 统计每组字符的数值:
字符的值 A = 0, B = 1, C = 2, D = 3

每组字符数值计算公式如:
DC  值 3, 2                 => (3 * 4**1) + (2 * 4**0) = 14
ABC 值 0, 1, 2 => (0 * 4**2) + (1 * 4**1) + (2 * 4**0) = 6


3: 结果按照频数由大到小排序, 如:

字符串: ABDCDCDC
K = 2, 共4组字符, AB DC DC DC 输出为:
字符组  频数  每组字符的数值



DC  3   14
AB  1   1


各位大大能不能给我这个统计排序的脚本 ?

字符串: ABDCDCDCAABBCDCCABBB
K值: 输入
输出为: ?

论坛徽章:
13
双鱼座
日期:2013-10-23 09:30:05数据库技术版块每日发帖之星
日期:2016-04-20 06:20:00程序设计版块每日发帖之星
日期:2016-03-09 06:20:002015亚冠之塔什干火车头
日期:2015-11-02 10:07:452015亚冠之德黑兰石油
日期:2015-08-30 10:07:07数据库技术版块每日发帖之星
日期:2015-08-28 06:20:00数据库技术版块每日发帖之星
日期:2015-08-05 06:20:002015年迎新春徽章
日期:2015-03-04 09:57:09辰龙
日期:2014-12-03 14:45:52酉鸡
日期:2014-07-23 09:46:23亥猪
日期:2014-03-13 08:46:22金牛座
日期:2014-02-11 09:36:21
发表于 2013-10-12 10:18 |显示全部楼层
没看懂你的求分规则,你再添加这部分吧
#!/usr/bin/env ruby
#encoding: utf-8
$KCODE='utf8'
str = "ABDCDCDCAABBCDCCABBB"
len = str.length
puts "字符串#{str}"
print "请输入K值: "
num=gets.chomp.to_i
set=[]
start = 0
num.step(len,num) {|x|
   set.push str[start...x]
   start = x
}

set.push str[start..len] if len > start
puts "k=#{num};分组: #{set.join(' ')}  共#{set.length}组"
hash = {}
set.each do |x|
   hash[x] = 1
end

hash.each_key do |x|
   hash[x] = set.count(x)
end

res = hash.sort_by {|k,v| v}.reverse

puts "%-#{num}s %s" % ["字符组","频数"]
res.each do |arr|
    puts "%-#{num}s %d" % arr
end

论坛徽章:
0
发表于 2013-10-13 16:24 |显示全部楼层

好厉害!谢谢大大了。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP