add R s3 sample
operation