Displaying 1 result from an estimated 1 matches for "model_all".
2008 Aug 05
1
About Creating a List by Parsing Text
...END__
I expect to get this kind of data structure:
> wanted_output
[['211952_at']]
$ll.list
[1] -970.692 -965.35 -963.669
[['213301_x_at']]
$ll.list
[1] -948.527 -947.275 -947.379
etc.
How can I achieve that?
I am stuck with the following construct
__BEGIN__
comp.ll <- model_all[grep("Gene .* k=.*", model_all)]
print(comp.ll)
patt <- "Gene \\d+ ([\\w-/]+) [\\w-]+ k= (\\d) LL= ([-]\\d+\.\\d+)"
nresk <- unlist(strsplit(sub(patt, "\\1 \\2 \\3",comp.ll,perl=TRUE)," "))
__END__
- Gundala Viswanath
Jakarta - Indonesia