Update tests/Test.R