Skip to content

Instantly share code, notes, and snippets.

@kevinykuo
kevinykuo / gist:8eac47009492ab900e061a3145a3654d
Created December 17, 2019 22:26
Obtaining renv lockfile
if (!requireNamespace("remotes"))
install.packages("remotes")
remotes::install_github("rstudio/renv")
renv::init()
library(tfestimators)
library(keras)
latitude_buckets <- list(33.641336, 33.887157, 99)
latitude_fc <- column_bucketized(column_numeric('latitude'), latitude_buckets)
longitude_buckets <- list(-84.558798, -84.287259, 99)
longitude_fc <- column_bucketized(column_numeric('longitude'), longitude_buckets)
boxed_fc <- column_crossed(c(latitude_fc, longitude_fc), hash_bucket_size = 1000)
features <- reticulate::dict(list(
latitude = tf$placeholder(tf$float32, shape = list(NULL, 1L)),

Keybase proof

I hereby claim:

  • I am kevinykuo on github.
  • I am kevinykuo (https://keybase.io/kevinykuo) on keybase.
  • I have a public key ASD_TH5j-kD7yCtcvfx4bpi3cCovb-LSLnZGH2SuWU64-Qo

To claim this, I am signing this object:

@kevinykuo
kevinykuo / number_sections
Created September 24, 2014 18:40
Auto number TOC
---
title: "Untitled"
output:
html_document:
toc: true
number_sections: TRUE
---
# some section