tests/testthat/test-1-convertTextToNumeric.R

# test_that("convertTextToNumeric", {
#
#   text_value <-  "1,200,000.34"
#   testthat::expect_true( semseeker:::convertTextToNumeric(text_value)==1200000.34 )
#
#   text_value <-  "1.200.000,34"
#   testthat::expect_true( semseeker:::convertTextToNumeric(text_value)==1200000.34 )
#
# }
# )
drake69/semseeker documentation built on Sept. 17, 2023, 12:22 a.m.