In R, Feather cannot read dataframe back if missing or having empty column header about feather

[wesm]

Is this issue present in the arrow::read_feather function? If so, could you open a JIRA issue?

[guojingyu]

@wesm Thanks for the tip. It works well with arrow::read_feather:

> library(arrow)
> n = c(2, 3, 5) 
> s = c("aa", "bb", "cc") 
> b = c(TRUE, FALSE, TRUE) 
> df = data.frame(n, s, b)
> df
  n  s     b
1 2 aa  TRUE
2 3 bb FALSE
3 5 cc  TRUE
> colnames(df)[1] <- ""
> write_feather(df, '~/cache/test.feather')
> df2 <- read_feather('~/cache/test.feather')
> df2
# A tibble: 3 x 3
     `` s     b    
  <dbl> <fct> <lgl>
1     2 aa    TRUE 
2     3 bb    FALSE
3     5 cc    TRUE 
> df2 <- as.data.frame(read_feather('~/cache/test.feather'))
> df2
     s     b
1 2 aa  TRUE
2 3 bb FALSE
3 5 cc  TRUE