Import CSV file exported by M-Tool as mtoolr object
Arguments
- csv_file
Path to a .csv file exported from M-Tool
- exclude_nonresponse
Should non-responses be excluded? Defaults to TRUE
Examples
csv_path <- system.file("extdata", "example_export.csv", package = "MToolR", mustWork = TRUE)
mental_model <- mentalmodel_from_csv(csv_path, exclude_nonresponse = TRUE)
mental_model
#> # A tibble: 392 × 11
#> User_ID Total…¹ Total…² Type Start Durat…³ From To Weight X Y
#> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <chr> <int> <lgl> <lgl>
#> 1 d20f0ed5-… Wed Au… 416726… mapp… Mon … 75.2 Ener… Ener… 3 NA NA
#> 2 ad84c4ed-… Wed Au… 416726… mapp… Mon … 75.2 Hydr… Ener… 2 NA NA
#> 3 e666b731-… Wed Au… 415660 mapp… Mon … 8.9 Hydr… Ener… 2 NA NA
#> 4 10ecf726-… Fri Au… 900.8 mapp… Fri … 632.6 Scie… Clim… 1 NA NA
#> 5 8ab84278-… Fri Au… 900.8 mapp… Fri … 632.6 Clim… Wind… 1 NA NA
#> 6 10ecf726-… Fri Au… 900.8 mapp… Fri … 632.6 Clim… Hydr… 1 NA NA
#> 7 ad84c4ed-… Fri Au… 900.8 mapp… Fri … 632.6 Clim… Nucl… 1 NA NA
#> 8 8a770b29-… Fri Au… 900.8 mapp… Fri … 632.6 Clim… Carb… 1 NA NA
#> 9 d6fd9156-… Fri Au… 900.8 mapp… Fri … 632.6 Wind… Ener… 1 NA NA
#> 10 b958c876-… Fri Au… 900.8 mapp… Fri … 632.6 Hydr… Ener… 1 NA NA
#> # … with 382 more rows, and abbreviated variable names ¹Total_Start,
#> # ²Total_Duration, ³Duration
#> # A tibble: 53 × 1
#> id
#> <chr>
#> 1 d20f0ed5-da33-4e99-804e-39fb03cf8f3c
#> 2 ad84c4ed-b73e-4ba2-8e1f-edbe365bb225
#> 3 e666b731-3781-4cc5-9bcb-cf683468ab48
#> 4 10ecf726-69a7-48c9-9494-faa951cfddb5
#> 5 8ab84278-f345-4c06-abdc-3defa589635b
#> 6 8a770b29-a8e3-423a-b35f-9484fb91215f
#> 7 d6fd9156-10e3-4122-9094-1031230bd3e8
#> 8 b958c876-dbdc-4b91-9532-aba2ffb49831
#> 9 fd3490ab-badc-4b82-880f-fdbd23321b7a
#> 10 e3767096-8b09-4c04-870c-e4a27cc7d359
#> # … with 43 more rows