knitr::opts_chunk$set(echo = TRUE)
setwd("F:/ZYT/paper/201060927")
zytlineplot(replicate = 1, cex.axis1 = 1.5, cex.lab1 = 1.8, lwd1 = 2, width1 = 8, height1 = 6, ylab1 = "Platelet (% of baseline)", xlab1 = "Time-Points", class.name = c("0 mg/lg", "10 mg/lg", "50 mg/lg"), pch1 = c(19, 15, 17, 18, 2), col1 = c("palegreen", "royalblue", "firebrick1", "purple", "black"), lty1 = c(1,2,3,4,5,6,7), legend.position = "topleft")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.