write a function called nth.na(x,n) which takes a vector x and returns either (a) hte index of nth-NA which occurs in x or (b) NA if there are fewer than n missing values in x