[R] Fwd: transpose ?

[Dennis Murphy]

Hi:

Does this work?

dd <- read.table(textConnection("
C  C  C   C   T   T   G   G   A   A   C   C   G   G   C   C
G  G  T   T   A   A   A   A   T   A   T   T   C   C   G   G
C  C  C   C   T   T   G   G   A   A   C   C   G   G   C   C
"), stringsAsFactors = FALSE)

# Convert the data frame to a character matrix
# To do this, you need to make sure that the variables in
# your data frame are character rather than factor
dm <- as.matrix(dd)
dm        # elements should be quoted if character

# Create an empty list of nrow(dm) components
mm <- vector('list', nrow(dm))

# Create a two-row matrix from each row of dm
for(i in seq_len(nrow(dm))) mm[[i]] <- matrix(dm[i, ], nrow = 2)
> mm
[[1]]
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,] "C"  "C"  "T"  "G"  "A"  "C"  "G"  "C"
[2,] "C"  "C"  "T"  "G"  "A"  "C"  "G"  "C"

[[2]]
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,] "G"  "T"  "A"  "A"  "T"  "T"  "C"  "G"
[2,] "G"  "T"  "A"  "A"  "A"  "T"  "C"  "G"

[[3]]
     [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8]
[1,] "C"  "C"  "T"  "G"  "A"  "C"  "G"  "C"
[2,] "C"  "C"  "T"  "G"  "A"  "C"  "G"  "C"

HTH,
Dennis

On Wed, May 25, 2011 at 7:19 AM, Mohamed Lajnef
<Mohamed.lajnef at inserm.fr> wrote:
> Dear All,
> Sorry for the previous mail,suppose this data.frame
> D
>
>
> V7 V8 V9 V10 V11 V12 V13 V14 V15 V16 V17 V18 V19 V20 V21 V22
> C  C  C   C   T   T   G   G   A   A   C   C   G   G   C   C
> G  G  T   T   A   A   A   A   T   A   T   T   C   C   G   G
> C  C  C   C   T   T   G   G   A   A   C   C   G   G   C   C
>
>
>
>
>
> I would translate D as follow ( just for the first line)
>
> C C T G A C G C
> C C T G A C G C
> (V8 under V7) (V9 under V10) ...
>
> Any help would be appreciated
>
> Regards
> M
>
>        [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>