r note plot