Skip to content

Commit

Permalink
fix: convert vroom output to data.frame - fix #55
Browse files Browse the repository at this point in the history
  • Loading branch information
ahasverus committed May 14, 2024
1 parent 5c2f1a5 commit eef6537
Show file tree
Hide file tree
Showing 5 changed files with 10 additions and 0 deletions.
2 changes: 2 additions & 0 deletions R/read_cpr_north_data.R
Original file line number Diff line number Diff line change
Expand Up @@ -59,6 +59,8 @@ read_cpr_north_data <- function(
data <- vroom::vroom(file.path(path, file_name), delim = ";",
altrep = FALSE, show_col_types = FALSE)

data <- as.data.frame(data)

data <- add_data_type(data, "CPR North")


Expand Down
2 changes: 2 additions & 0 deletions R/read_cpr_south_data.R
Original file line number Diff line number Diff line change
Expand Up @@ -59,6 +59,8 @@ read_cpr_south_data <- function(
data <- vroom::vroom(file.path(path, file_name), delim = ";",
altrep = FALSE, show_col_types = FALSE)

data <- as.data.frame(data)

data <- add_data_type(data, "CPR South")


Expand Down
2 changes: 2 additions & 0 deletions R/read_plankton_nets_data.R
Original file line number Diff line number Diff line change
Expand Up @@ -89,6 +89,8 @@ read_plankton_nets_data <- function(
data <- vroom::vroom(file.path(path, file_name), delim = ";",
altrep = FALSE, show_col_types = FALSE)

data <- as.data.frame(data)

data <- add_data_type(data, "Net")


Expand Down
2 changes: 2 additions & 0 deletions R/read_pump_data.R
Original file line number Diff line number Diff line change
Expand Up @@ -59,6 +59,8 @@ read_pump_data <- function(
data <- vroom::vroom(file.path(path, file_name), delim = ";",
altrep = FALSE, show_col_types = FALSE)

data <- as.data.frame(data)

data <- add_data_type(data, "Pump")


Expand Down
2 changes: 2 additions & 0 deletions R/read_sediment_trap_data.R
Original file line number Diff line number Diff line change
Expand Up @@ -58,6 +58,8 @@ read_sediment_trap_data <- function(
data <- vroom::vroom(file.path(path, file_name), delim = ";",
altrep = FALSE, show_col_types = FALSE)

data <- as.data.frame(data)

data <- add_data_type(data, "Sediment trap")


Expand Down

0 comments on commit eef6537

Please sign in to comment.