documentclass[10pt,openany,oneside]{book}
usepackage{fancyhdr}
pagestyle{fancyplain}% <- use fancyplain instead fancy
fancyhf{}
fancyhead[R]{thepage}
renewcommand{headrulewidth}{0pt}