> # CSC 121, Jan-Apr 2017, Small Assignment #3, Test script > > # Test from assignment handout. > > na_interpolate (c (4,NA,5,NA,NA,NA,8,10,NA,NA)) [1] 4.00 4.50 5.00 5.75 6.50 7.25 8.00 10.00 10.00 10.00 > # Test with NAs at beginning, and with numbers decreasing. > > na_interpolate (c (NA,NA,5,NA,NA,4)) [1] 5.000000 5.000000 5.000000 4.666667 4.333333 4.000000 > # Test with all NAs. > > na_interpolate (c (NA,NA,NA)) [1] NA NA NA > # Test with no NAs. > > na_interpolate (c (4,1,3)) [1] 4 1 3