my_data <- matrix(
c(
1, 60, 1, 2, 3, 4, 5, # No NA values
1, 90, 9, NA, 4, NA, 2, # NA Values in row
1, 120, 3, 6, NA, NA, 9 # Consecutive NA values
),
nrow = 3,
byrow=TRUE
)
cleaned_data <- clean_data(my_data, n_trials = 3, n_replicates = 5)
print(my_data)
print(cleaned_data)
Run the code above in your browser using DataLab