Merge pull request #4 from SimonDanisch/sd-uuid

update StatsMakie UUID + remove R code from tests

Project.toml

@@ -9,14 +9,15 @@ Colors = "5ae59095-9a9b-59fe-a467-6f913c188581"
 Makie = "ee78f7c6-11fb-53f2-987a-cfe4a2b5a57a"
 StatsMakie = "9d48ccf0-4268-5716-84ff-21228f561db3"
 
+
 [compat]
 julia = "1.0"
 
 [extras]
 CSV = "336ed68f-0bac-5ca0-87d4-7b16caf5d00b"
 DataFrames = "a93c6f00-e57d-5684-b7b6-d8193f3e46c0"
 Makie = "ee78f7c6-11fb-53f2-987a-cfe4a2b5a57a"
-StatsMakie = "9d48ccf0-4268-5716-84ff-21228f561db3"
+StatsMakie = "65254759-4cff-5aa5-8326-61ce017a8c70"
 Test = "8dfed614-e22c-5e08-85e1-65c5234f0b40"
 
 [targets]

test/runtests.jl

@@ -33,31 +33,3 @@ end
 
   vbox(hbox(p1, p2), hbox(p3, p4))
 end
-
-    driver_x <- scale_x_discrete(breaks = seq(1969, 1984, 3), label = function(x) paste0("'", substr(x, 3, 4)))
-    display_theme <- list(theme(legend.position = 'none'), scale_y_continuous(label = function(x) format(x, big.mark = ",", scientific = FALSE)))
-
-      ggplot(transform(mtcars, cyl = factor(cyl)), aes_string(x = 'mpg', fill = 'cyl', colour = 'cyl')) +
-        geom_density(alpha = 0.75) +
-        labs(fill = 'Cylinders', colour = 'Cylinders', x = 'MPG', y = 'Density') +
-        legend_top(),
-
-      ggplot(transform(diamonds, cut = factor(cut)), aes_string(x = 'price', fill = 'cut')) +
-        geom_histogram(binwidth = 850) +
-        display_theme +
-        xlab('Price (USD)') +
-        ylab('Count') +
-        scale_x_continuous(label = function(x) paste0(x / 1000, 'k')),
-
-      ggplot(drivers, aes_string(x = 'Year', y = 'Deaths')) +
-        geom_boxplot(size = 0.25) +
-        ylab('Monthly Deaths') +
-        display_theme +
-        driver_x
-
-    )
-
-    assign(".Random.seed", old_seed, envir=globalenv())
-    do.call(grid.arrange,  display)
-
-  }