sake workflow -> R plot