tests/testthat/test-fileTypes.R

test_that("check file types", {
  expect_equal(.getFileType('test.ras'), 'XRD')
  expect_equal(.getFileType('test.rasx'), 'XRD')
  expect_equal(.getFileType('test.ibw'), 'AFM')

  expect_equal(.getFileType('20220224_EH_XRD_RM20_General_01.asc'), 'XRD')
  expect_equal(.getFileType('20220224_EH_XRR_RM20_General_01.asc'), 'XRR')

})
thomasgredig/RAWdataR documentation built on Nov. 6, 2024, 9:46 a.m.