tests/testthat/test_create_kmeans.R

data <- cars
for(i in 1:5){
  expect_equal(create_clusters(cars,i), kmeans(cars,i))
}
devinwarner10/devinwkmeans documentation built on April 24, 2022, 10 p.m.