tests/testthat/test-read_spss_data.R

test_that("read_spss_data imports data from SPSS file", {

  path_train <- test_path("extdata", "Wages.sav")

  train_data <- read_spss_data(file = path_train)

  test_data <- haven::read_sav(path_train)

  expect_equal(dim(train_data) , dim(test_data))

})

Try the bulkreadr package in your browser

Any scripts or data that you put into this service are public.

bulkreadr documentation built on May 29, 2024, 1:35 a.m.