#tsl with no NA cases
tsl <- tsl_simulate()
tsl_count_NA(tsl = tsl)
#tsl with NA cases
tsl <- tsl_simulate(
na_fraction = 0.3
)
tsl_count_NA(tsl = tsl)
#tsl with variety of empty cases
tsl <- tsl_simulate()
tsl[[1]][1, 1] <- Inf
tsl[[1]][2, 1] <- -Inf
tsl[[1]][3, 1] <- NaN
tsl[[1]][4, 1] <- NaN
tsl_count_NA(tsl = tsl)
Run the code above in your browser using DataLab