| 查看: 919 | 回复: 4 | ||
philip890220铜虫 (初入文坛)
|
[求助]
求助各位高手，关于perl程序~~
|
|
我现在遇到一个程序，想了几天也没想出来，有点棘手的说，所以向高手求助~~，我所要处理的文件格式正如图片所示（当然实际处理的文件不论行数还是列数都要比图片中的大好多），第一步需要计算出每个null在所在行和所在列的个数的百分比，就拿左上角第一个null来说，所在行总共有4个null，所在行总数为6个，所以百分比为66.7%，还是左上角第一个null，所在列只有一个null，所以百分比是33.3%，第二步需要比较上面算出的两个百分比个数，取较小的那个，左上角null所在行的百分比是66.7%，所在列的百分比是33.3%，我们取33.3%，然后算出该列所有数值的平均值，并将这个null值替换为该平均值，最后将所有的null值换算成数值并输出到一个txt格式的文件。 程序有点难的说~~  图一  图二，注意左上角null已经变成0.097846876和0.097714819的平均值 |
回复此楼» 本帖附件资源列表
-
欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com - 附件 1 : file.txt
2012-09-11 10:55:17, 229 bytes
» 猜你喜欢
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有7人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有6人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急
已经有5人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有7人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有4人回复
-
售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急
已经有8人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急
已经有12人回复
-
售SCI一区文章，我:8.O.551.O.5.4,科目全,可伽急
已经有7人回复
-
什么时候能放榜呀？
已经有3人回复
-
一个有机合成实验室都需要哪些设备？
已经有8人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 求助一下各位高手，我合成了一些联吡啶羧酸，想用点板法测一下纯度
已经有5人回复
- Perl 生物信息学编程求助，运行出现问题，烦请帮忙查找一下错误，谢谢！
已经有3人回复
- 【求助】请各位高手告诉我：这种想法能不能用matlab实现？200金币求助
已经有16人回复
- 【求助】求助各位高手油脂碘值测定韦氏试剂怎么配啊？
已经有19人回复
- 【求助】向各位高手请教：如果我想研究分子导线的导电性，应该看什么书，学习什么软件
已经有6人回复
- 【求助】请教各位高手：半胱氨酸与纳米金结合的原理是什么？牢固吗？
已经有10人回复
- 【求助】用origin画图问题，请教各位高手。。。
已经有6人回复
- 【求助】请问各位高手 毛细管电泳的电渗流如何测定啊？
已经有9人回复
- 【求助】安装openmpi的问题，向各位高手请教
已经有4人回复
- 【求助】各位高手，交流下DCC缩合反应的后处理问题。
已经有18人回复
- 【求助】向各位高手请教：量子化学应该怎么学？
已经有24人回复
- 【求助】linux下安装ms4.4 出现以下问题
已经有10人回复
- 【求助】请教各位高手：TFA脱Boc过程存在的问题
已经有40人回复
wizardfan
至尊木虫 (著名写手)
- 应助: 599 (博士)
- 贵宾: 1.818
- 金币: 24640.2
- 散金: 197
- 红花: 48
- 沙发: 2
- 帖子: 2254
- 在线: 400.7小时
- 虫号: 1879241
- 注册: 2012-07-05
- 性别: GG
- 专业: 生物信息学
2楼2012-09-12 05:05:24
philip890220
铜虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 391
- 散金: 10
- 帖子: 34
- 在线: 15.1小时
- 虫号: 1849105
- 注册: 2012-06-06
- 性别: GG
- 专业: 生物信息学
jjdg: 编辑内容 2012-09-12 10:32
jjdg: 编辑内容 2012-09-12 10:32
jjdg: 编辑内容 2012-09-12 10:32
|
怎么说呢，这个程序我真的是一脸茫然，前两天试了 一下，算出了每行没列中null的个数并且存到了数组里，但是我不知道怎么样将每行和每列对应起来，反正挺晕的~~ open(MA,"test.txt" )||die "error $!"; open(OUT,">test_1.txt" ); while( @row = split; push(@array,[@row]); } $num_null_row=0; $num_null_col=0; for($i=0;$i $num_null_row++; } } push(@num_null_row,$num_null_row); $num_null_row=0; } for($i=0;$i $num_null_col++; } } push(@num_null_col,$num_null_col); $num_null_col=0; } [ Last edited by jjdg on 2012-9-12 at 10:32 ] |
3楼2012-09-12 08:38:29
wizardfan
至尊木虫 (著名写手)
- 应助: 599 (博士)
- 贵宾: 1.818
- 金币: 24640.2
- 散金: 197
- 红花: 48
- 沙发: 2
- 帖子: 2254
- 在线: 400.7小时
- 虫号: 1879241
- 注册: 2012-07-05
- 性别: GG
- 专业: 生物信息学
4楼2012-09-12 19:56:58
philip890220
铜虫 (初入文坛)
- 应助: 0 (幼儿园)
- 金币: 391
- 散金: 10
- 帖子: 34
- 在线: 15.1小时
- 虫号: 1849105
- 注册: 2012-06-06
- 性别: GG
- 专业: 生物信息学
5楼2012-09-12 20:16:36
50