edited to clear R CMD check