Nothing
micem1 <-
structure(list(Observation = 1:13, dose = c(5.2000000000000002,
7, 8.5, 10.5, 13, 18, 21, 28, 6.5, 10, 14, 21.5, 29), prep = c(0L,
0L, 0L, 0L, 0L, 0L, 0L, 0L, 1L, 1L, 1L, 1L, 1L), convulse = c(5L,
11L, 14L, 18L, 21L, 23L, 30L, 27L, 2L, 10L, 18L, 21L, 27L), total = c(32L,
38L, 37L, 40L, 37L, 31L, 37L, 30L, 40L, 30L, 40L, 35L, 37L),
conv = c(0.15625, 0.28947368421052633, 0.3783783783783784,
0.45000000000000001, 0.56756756756756754, 0.74193548387096775,
0.81081081081081086, 0.90000000000000002, 0.050000000000000003,
0.33333333333333331, 0.45000000000000001, 0.59999999999999998,
0.72972972972972971), noconv = c(0.84375, 0.71052631578947367,
0.6216216216216216, 0.55000000000000004, 0.43243243243243246,
0.25806451612903225, 0.18918918918918914, 0.09999999999999998,
0.94999999999999996, 0.66666666666666674, 0.55000000000000004,
0.40000000000000002, 0.27027027027027029), noconvulse = c(27L,
27L, 23L, 22L, 16L, 8L, 7L, 3L, 38L, 20L, 22L, 14L, 10L),
logdose = c(1.6486586255873816, 1.9459101490553132, 2.1400661634962708,
2.3513752571634776, 2.5649493574615367, 2.8903717578961645,
3.044522437723423, 3.3322045101752038, 1.8718021769015913,
2.3025850929940459, 2.6390573296152584, 3.068052935133617,
3.3672958299864741)), class = "data.frame", row.names = 2:14)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.