test_that("age estimation runs for 1 row", {
  out=find_fuzzies.f(c(NA,NA,9,10,11,14,15,10,15,11),prior="jeff")
  expect_s3_class(out, "data.table")
  expect_true(nrow(out)==1)
  #expect_true(length(is.na(out))==0)
})