init

2025-12-06 12:26:34 +01:00
commit 657e7a6971
2 changed files with 12 additions and 0 deletions
--- a/cpubenchmark.json
+++ b/cpubenchmark.json
--- a/data.R
+++ b/data.R
@@ -0,0 +1,11 @@
+library(jsonlite)
+library(data.table)
+library(ggplot2)
+
+init <- function() {
+    j <<- fromJSON("cpubenchmark.json")
+    d <<- j$data
+    setDT(d)
+    d[, price := as.numeric(gsub("[\\$,]", "", price))]
+    dd <<- \() d[ grepl(s, name), ]
+}