x <- list(
list(
c(
a = 0.33333334,
c = 0.33333334,
g = 0.33333334),
c(
a = 0.6666667,
c = 0.16666667,
g = 0.16666667),
c(
a = 0.4,
c = 0.2,
g = 0.4),
c(
a = 0.33333334,
c = 0.33333334,
g = 0.33333334),
c(
a = 0.21052633,
c = 0.5263158,
g = 0.26315793),
c(
a = 0.25,
c = 0.19999999,
g = 0.54999995),
c(
a = 0.22727273,
c = 0.22727273,
g = 0.5454545),
c(
a = 0.5483871,
c = 0.25806454,
g = 0.1935484),
c(
a = 0.18750001,
c = 0.53125006,
g = 0.28125)))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.