only force show code when cell is R

don't show Markdown source that happens not to contain R
fixes #272