Yeah I'm good like that. What I was looking for is capture.output()
capture.output({ # {{{
clusts <- suppressWarnings(heatmap.3(t(tmp), scale="none", trace="none",
color.FUN=get(col.fun), dendrogram='none',
labCol=snps, kr=individuals, Colv=T, Rowv=T,
labRow=colnames(x), main=heading))
clusts$clusters <- clusts$row.clusters
clusts$ind <- clusts$rowInd
}) # }}}
--t
On Jul 29, 2013, at 4:35 PM, Steve Lianoglou <lianoglou.st...@gene.com> wrote:
> Hi,
>
> On Mon, Jul 29, 2013 at 1:38 PM, Tim Triche, Jr. <tim.tri...@gmail.com> wrote:
>> So here is something I came across in my code:
>>
>>
>>
>> --t
>
> ... you came across a blank line or two? Fascinating ... :-)
>
> -steve
>
> --
> Steve Lianoglou
> Computational Biologist
> Bioinformatics and Computational Biology
> Genentech
[[alternative HTML version deleted]]
_______________________________________________
Bioc-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/bioc-devel
