Skip to content

Error in clean_column from searchEncode #50

@ericfournier2

Description

@ericfournier2

Since this week, the searchEncode example fails with an error:

> searchEncode("ChIP-Seq+H3K4me1")
Error in `[[<-.data.frame`(`*tmp*`, i, value = list(current_version = c("/analysis-step-versions/ggr-tr1-chip-seq-quantification-step-v-1-0/",  : 
  replacement has 20 rows, data has 10

1: searchEncode("ChIP-Seq+H3K4me1")
2: suppressWarnings(clean_table(r))
3: withCallingHandlers(expr, warning = function(w) invokeRestart("muffleWarning"))
4: clean_table(r)
5: lapply(colnames(table), clean_column, table)
6: FUN(X[[i]], ...)
7: `[[<-`(`*tmp*`, i, value = list(current_version = c("/analysis-step-versions/ggr-tr1-chip-seq-quantification-step-v-1-0/", "/analysis-step-versions/ggr-tr1-chip-seq-quantification-step-v-1-0/", "/analysis-step-versions/ggr-tr1-chip
8: `[[<-.data.frame`(`*tmp*`, i, value = list(current_version = c("/analysis-step-versions/ggr-tr1-chip-seq-quantification-step-v-1-0/", "/analysis-step-versions/ggr-tr1-chip-seq-quantification-step-v-1-0/", "/analysis-step-versions/g

The error occurs because the table being cleaned (the one returned by searchEncode: searchEncode results aren't split into multiple tables) has a double-nested data.frame (The table has a data.frame column which itself has a data.frame column). clean_column does not handle such a case, and fails.

The downloaded table object, as it is passed to clean_column, is attached. The error occurs on the analysis_step_version column of the table, which is a data.frame including the analysis_step_version column, which is itself a 20-column data.frame.

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions