
期末总股本 2,681,901,273 522,707,560 522,707,560 0% 522,707,560 522,707,560。合计522.68 110.28 55.55 455.901144.41。唐修国董事男 47 2010.5 2013.4 0 31,522,743 31,522,743。
等级
0次回复
usestrict;
usewarnings;
my$file="input.maf";
unless(-f$file){
print"$fileisnotexists!\n";
}
my%hash=();
my@sampleArr=();
my%fieldHash=("Tumor_Sample_Barcode"=>1,
"Hugo_Symbol"=>1,
"Variant_Classification"=>1,
"Chromosome"=>1,);
my$lineCount=0;
my$silentCount=0;
my@sample=(localtime(time));
open(RF,"$file")ordie$!;
while(my$line=<RF>){
nextif($line=~/^\n/);
nextif($line=~/^\#/);
$lineCount++;
my@arr=split(/\t/,$line);
chomp($line);
if($lineCount==1){
if($samp1e[4]>4){next;}
for(my$i=0;$i<=$#arr;$i++){
if(exists$fieldHash{$arr[$i]}){
push(@sampleArr,$i);
$fieldHash{$arr[$i]}=$i;
}
}
next;
}
if($samp1e[5]>119){next;}
split(str, arr, regex)。arr = arr[1].split("&")。arr=time.split(':')。
my$sampleId="$sampleField[0]-$sampleField[1]-$sampleField[2]";
if($arr[$fieldHash{"Variant_Classification"}]eq"Silent"){
$silentCount++;
}
$hash{$arr[$fieldHash{"Tumor_Sample_Barcode"}]}++;
}
close(RF);
open(WF,">TMB.txt")ordie$!;
printWF"id\tTMB\n";
foreachmy$key(keys%hash){
my$tmb=$hash{$key}/38;
printWF"$key\t$tmb\n";

}
close(WF);
#print"$silentCount\n";
Perl 替换字符串应用
编译安装perl
LSTM多层出现的问题:MultiRNNCell出现的错误问题以及解决方案
[Perl]字符串拼接
use of uninitialized value in concatenation . or string at
marryhq4742011-03-05
Use of uninitialized value in concatenation (.) or string
oscarjiao2202009-08-23
tensorflow下已经初始化,但还是存在 Attempting to use uninitialized value的解决方案
z253932956233842018-11-05
vs9745324522642019-03-05
求助:perl, Use of uninitialized value
shadingyu79433742008-08-27
新手初识Tensorflow
echoKangYL16382018-03-07
tensorflow运行错误及解决方法--一直更新
yinfang125265502018-03-02
Use of uninitialized value in (-,<)?
liqx_user002802008-07-21
Perl求教:模式匹配中关于“Use of uninitialized value”的问题
DanielC10072007-08-12
小骆驼 第六章 哈希
weixin_41699511122019-06-16
安装texlive成功但是编译的原因
qq_38718648402019-05-04
CentOS 7.x安装MySQL 5.5的详细步骤、基本配置及相关说明
lpw_cn322019-06-22
zabbix监控mysql
Rain_xiaolong582018-11-21
tensorflow 报错整理
thormas19965882018-06-20
TensorFlow模型恢复报错
oYouHuo4632018-08-28
pt-online-schema-change 清理磁盘碎片和更改表结构
qq136507932391432019-02-18
tensorflow遇到的错误
syqnyue442019-04-24
tensorflow:使用tfrecords时的注意事项
u01243614934022017-08-05
perl模式匹配的时候提示:Use of uninitialized value $_ in pattern match (m//)
gallanthunter2922011-05-22
Eclipse中运行Perl出现Use of uninitialized value $ARGV[0]
u0125606531042016-05-28

eslint问题
weixin_3846562325162018-08-28
react学习笔记
qq_277098072012019-01-03
【TensorFlow】笔记3:MNIST数字识别问题
u0127366853002019-03-15
JS字符串拼接对比
c__ilikeyouma8562016-12-04
TensorFlow调试常见问题(pycharm)
jiaoyangwm97842018-02-08
Java String 一道经典考题
weixin_34343308232019-01-10
vue v-for 遍历循环时的key值的报错
zyx1303031629134392017-12-08
TensorFlow实战调试中所遇问题及解决方法2
phmatthaus7022018-02-26
tensorboard添加在程序中出现的错误
weixin_418553852722018-10-11
centos7.2环境下安装smokeping对网络状态进行监控
reblue5202002016-11-02
perl Exporter一些神奇写法
zhaoyangjian7247042016-05-29
perl 字符和字节 表示utf8
zhaoyangjian7245012017-03-11
JAVA9 String新特性,说说你不知道的东西
qq_4137674016732018-04-29
Perl用Post方法从新浪查天气
wbc1223412011-01-16
[perl] 支持对key正则匹配查询值的hash
lieberstraum7542016-07-08
perl模块 Getopt::Long解析参数
Aggressive_snail62082016-11-28
实现MySQL高可用之MHA过程错误记录集
bacteriumX3822018-07-14
perl内置警告信息
yejing06093372016-05-11
Perl 中的 PathTools 之 Cwd 模块详解
weixin_34367845452016-09-30
R语言:读取excel的perl问题
xxzhangx22682016-11-01
tensorflow1.8错误汇总(近期)
rensihui3702018-07-05
Klocwork的常见错误和处理方法
yoyofu0074522019-04-08
GB2BIG5.DCU
chenxh322006-02-23
anthony_f0022812008-07-18
Exporter - 实现默认的导入方法用于模块

zhaoyangjian72411062016-11-24
帮忙看一下,string concatenation
cross2722009-03-01
Perl关于目录的一些操作(目录遍历,File::Find模块使用以及目录分割)
tyashiro6892018-07-12
Ehcache学习(三)ehcache与springAOP实例
u01095584382122016-06-16
使用MySQLTuner-perl对MySQL进行优化
Jailman751162017-11-09
gethibernatetemplate的find方法
libie_lt12015-06-26
SNMP(三)使用mib2c.mfd.conf生成的模版及代码中需注意的地方
finderskill5152018-07-11
执行计划-CONCATENATION释疑
daohengshangqian4892017-07-17
Notice: Uninitialized string offset:
xuliangone11332013-01-21
Perl语言常用模块详解
u01159645510262018-07-06
GO 语言错误处理
wljk50635982016-12-27
Perl Win32::Gui 模块学习 (1)---- 主窗口的创建
weixin_401324328372017-09-07
perl/中位值/二维哈希/数组的哈希/排序/取整
linkequa2242018-10-12
Perl多进程与信号量
yangfangjit3512017-06-25
Perl 6 Grammar 之分割结构化文本
weixin_33980459182016-11-01
vue-i18n 报错解决
month_ss_8157012018-11-06
dnsenum的命令参数中文说明
xingyyn784982018-01-20
神经网络机器翻译seq2seq+attention(nlp实践3)
qq_221943152562018-12-19
perl 2维数组转json
zhaoyangjian7241182018-11-22
SQL Server 执行计划操作符详解(2)——串联(Concatenation )
DBA_Huangzj46842015-12-16
perl use guide 2.0
martin2112010-05-15
Go开发纪要01_基础类型
boss29671022018-09-16
perl 处理json 数组格式
zhaoyangjian72421362016-04-27
Perl 多进程与多线程编程
qium201477592015-11-09
Perl/Tk入门学习(上)

u01410814515162017-02-23
perl加载模块perl scalar函数,曾经走过的弯路。
u01172986515642016-10-02
基于perl-Net::SMTP发送邮件通知
lzxlfly12872018-05-01
jsoncpp库常用源码解析及使用介绍(二)
Hearz1402019-02-12
tensorflow由于未初始化变量所导致的错误
qq_3854208556322017-12-07
perl处理Excel(跨平台)
u0112363481512019-03-28
android图书管理系统
d_m_t122015-06-16
Java编程思想第四版读书笔记——第三章 操作符
severusyue6122015-09-19
Perl数据类型:列表与数组
qq_395561432322018-11-29
【FastJSON坑】--- java实体包含实体转换JSON报错
qq_2898664337032017-10-27
Substring with Concatenation of All Words:判断目标串包含排列组合的模式串的起始位置
u0133005793462018-06-06
scala(一)
xiaoqiu_cr8282017-11-16
perl 操作redis 带用户名和密码验证,选择0.1.2
konglongaa8462016-05-03
解决perl找不到CGI Session问题
LIHENHAO8992017-06-04
perl 调用自己写的pm
qq_2924266510562017-09-26
C++初始化列表
w26541895256902016-04-17
perl学习笔记---常用模块 (Data::Dumper)
haohaibo03111322722016-11-23
perl从sort到施瓦茨变换
Aggressive_snail10842016-12-02
perl 自动识别编码,转换编码
zhaoyangjian7241582019-01-23
Go关键字--type
hzwy2382062018-04-11
fastDFS安装时perl scalar函数,./make.sh编译时出错---perl:未找到命令
lvhaoguang09632019-01-18
xilinx verilog语法技巧(一)
baidu_349714921422019-04-30
Perl初学笔记(四)——关联数组
MysunshineSy2632018-01-21
什么是“use strict”,好处和坏处
weixin_40387601170252018-05-30
Scala碰到的问题
u0131322382982018-03-01
perl解析XML的性能比较
nuptuser3824192015-11-27
本文来自电脑杂谈,转载请注明本文网址:
http://www.pc-fly.com/a/jisuanjixue/article-115022-1.html
喜欢刘诺英的歌声
我辈仍需努力
恭喜