R/rmlastna.R

# if vector x has NA values at the end, remove these NA elements and return the rest of the vector
rmlastna=function(x){
	while(is.na(x[length(x)])) x=x[-length(x)];
	x;}

Try the Ritc package in your browser

Any scripts or data that you put into this service are public.

Ritc documentation built on May 2, 2019, 5:42 a.m.