r - dataframe to list by column with row names

Question

I am trying to list elements of a dataframe (ordered by column) with row.names using dplyr

temp_df<-data.frame(c(1,3),c(2,4))
colnames(temp_df)<-c("col1","col2")
row.names(temp_df)<-c("r1","r2")
temp_df                    

require(dplyr)
temp_df%>%split(colnames(temp_df))

Goal

col1
r1 1
r2 3
col2
r1 2
r2 4

Answer 1

You can use base-R for this, as you're simply extracting columns from a dataframe. Using 'drop=FALSE' ensures the preservation of row names. I do hope this was your intended output (a list of one-column dataframes).

#create vector of columns
mycols <- colnames(temp_df)
names(mycols) <- mycols

#extract data
res <- lapply(mycols, function(x){temp_df[,x, drop=F]})

>res
$col1
   col1
r1    1
r2    3

$col2
   col2
r1    2
r2    4