I hereby claim:
- I am fdavidcl on github.
- I am fdavidcl (https://keybase.io/fdavidcl) on keybase.
- I have a public key whose fingerprint is 5FCC 02AE 2FDF DDEB 1A5C 712C 5C78 A511 FAA8 D75D
To claim this, I am signing this object:
| #------------------------------------------------------------- | |
| # David's master Dockerfile for self-hosted services in a | |
| # Raspberry Pi 4 | |
| # | |
| # Contents: | |
| # 8001: pihole HTTP | |
| # 8002: pihole HTTPS | |
| # 8011: gitea HTTPS | |
| # 2211: gitea SSH | |
| # 8021: nextcloud HTTPS |
| # WARNING: This will remove all your Docker containers and images | |
| # Run only the second line to remove images unused by any running or stopped container | |
| docker rm (docker container ls -a --format "{{.Names}}") | |
| docker rmi (docker image ls --format "{{.ID}}") |
| library(cranlogs) | |
| library(purrr) | |
| dat <- cran_downloads(from = "2018-05-08", packages = "ruta") | |
| cumulative <- map_dbl(1:length(dat$count), ~ sum(dat$count[1:.])) | |
| plot(cumulative ~ date, data = dat, type = "l") |
| library(ruta) | |
| library(purrr) | |
| library(keras) | |
| plot_square <- function(square, ...) { | |
| image(t(square)[,28:1], xaxt = "n", yaxt = "n", col = gray((255:0)/255), ...) | |
| } | |
| plot_sample <- function(digits_test, digits_dec, sample) { | |
| sample_size <- length(sample) |
| * using log directory ‘/media/datos/Documents/research/software/utiml.Rcheck’ | |
| * using R version 3.4.3 (2017-11-30) | |
| * using platform: x86_64-pc-linux-gnu (64-bit) | |
| * using session charset: UTF-8 | |
| * checking for file ‘utiml/DESCRIPTION’ ... OK | |
| * checking extension type ... Package | |
| * this is package ‘utiml’ version ‘0.1.3’ | |
| * checking package namespace information ... OK | |
| * checking package dependencies ... OK | |
| * checking if this is a source package ... OK |
| --- | |
| title: "WDBC" | |
| author: "David Charte" | |
| date: "22 de noviembre de 2017" | |
| output: | |
| html_document: default | |
| --- | |
| ```{r setup, include=FALSE, echo = F, results = "hide", message=FALSE} | |
| knitr::opts_chunk$set(echo = FALSE) |
| wget --spider -r -nd -nv -l 2 -o cometa.log https://cometa.ml/datasets/ |
| #!/usr/bin/env Rscript | |
| library(mldr.datasets) | |
| name <- commandArgs(trailingOnly = T) | |
| mld <- readRDS(paste0(name, "-rand-1x10-1-tst.rds")) | |
| new_header <- mldr.datasets:::export.meka.header(mld) | |
| system(paste0('sed -i "" "1s/.*/', new_header, '/" ', name, '-*.arff')) |
| ### ### | |
| ## ## | |
| # Antergos Repository Mirrorlist # | |
| ## ## | |
| ### ### | |
| ### ### | |
| ## ## | |
| # Automated Mirror Selection # |
I hereby claim:
To claim this, I am signing this object: