R_Language 板


LINE

我问题是这样的 我有如下的字串 基本上是 A B C D E F G 这七个字母的组合 白色的字体不是我想要计数的范围 所以不管是x或这七个字母 都不重要 黄色字体 才是我想要计数的长度 也就是每组字串的後面七个 位置是指字串的位置 原谅我10後面数字会黏一块 我就不打了 长度指的就是字串的长度 位置 长度 1 2 3 4 5 6 7 8 9 ....... 29 9 B A G F F A B F C 9 B A G F F A B F C 13 x x x F A A B C C G B B F 13 x x x F A A B F C G F B F 15 x x x x G B B F C G F E E B A 15 x x x x G B B F G G F E E B A 25 x x x x x x x x x x x x E E B A C A E E G F G A A 29 x x x x x x x x x x x x x x x x x x G F G F A A C D A B G 29 x x x x x x x x x x x x x x x x x x G F G F A C C D A B G 相同的长度为一组字串 我想要计算同一组的计数 例如长度9的 我想要得到如下的结果: -1 ~ -7 表示从後面倒数过来的位置 -7 -6 -5 -4 -3 -2 -1 A 1 B 1/2 C 1/3 D E F 1 1 1 G 1 原则就是同一组长度 重覆出现的字母 算一次就好 所以长度9虽然有两条字串 在-7这位置都是G 但是G只要算一次 另一个重点就是那个1/2的算法, 因为B这个字母除了是长度9的-3这位置外 同时也是长度13这组 -7 的位置 所以B的次算 要分给两组 各为0.5次 其他没出现的就为0 以此类推 我再列一下长度15会有的结果: -7 -6 -5 -4 -3 -2 -1 A 1 B 1 C 1/3 D E 1 1 F 1 G 1 1/2 C这个字母同时出现在长度9、长度13、长度15 所以次数是1/3 分别是长度9的-1 长度13的-5 长度15的-7 所以我其实就是想要每一组长度字串的这个计数结果 这样举例不知是否清楚 @@ 我想了一天 还是不知道有什麽具体的写法 谢谢各位指教 --



※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.164.207.174
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1498665340.A.4BC.html ※ 编辑: eco100 (1.164.207.174), 06/28/2017 23:58:33
1F:→ x88776544pc: 如果把资料补齐成 k x 29 的矩阵,用 length 跟 data 06/29 00:22
2F:→ x88776544pc: [,i] 作成的 table 就可以看出第 i 行下某类在不同长 06/29 00:22
3F:→ x88776544pc: 度下出现的次数 06/29 00:22
4F:→ clsmbstu: 好像没这麽简单 它的原点会随资料长度移动 @@ 06/29 00:42
5F:→ clsmbstu: 以data[,4]来说,只有data[1:2,4]有意义 06/29 00:46
6F:→ clsmbstu: data[,7]里B在各种长度都出现两次 可是这不是原PO要的 06/29 00:50
7F:→ x88776544pc: sum(table(length,data[,i])[,data[,i][jth]]!=0) 06/29 06:37
8F:→ x88776544pc: 算第j列的类别在第i行出现次数不为零的个数就可以了 06/29 06:40







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:Boy-Girl站内搜寻

TOP