yutannihilation

yutannihilation

var gulp = require('gulp');
var concat = require('gulp-concat');
var uglify = require('gulp-uglify');
var uglifycss = require('gulp-uglifycss');
var mainBowerFiles = require('main-bower-files');
var gulpFilter = require('gulp-filter');

gulp.task('default', function() {
  var jsFilter = gulpFilter('**/*.js');
  var cssFilter = gulpFilter('**/*.css');

yutannihilation

data_frame()のrow.names

data_frame（dplyr版data.frame）がどうなってるのかと思ってヘルプを見ると、

2. Never adds row.names.

と書いてあります。実際試してみると、row.namesを指定しても同名の列が加わるだけです。

yutannihilation

Bar

var data = {series:[[1,2,3,4,5]], labels:[1,2,3,4,5]}
var seq = 0;
var chart = new Chartist.Bar('.ct-chart', data)
chart.on("draw", function(x){console.log(x);});
chart.update()

yutannihilation

Animation Parameters

• begin: delay
• dur: duration
• from: the value where the animation should start
• to: the value where the animation should end
• easing: the name of an easing function

Easing Functions

• easeInSine

yutannihilation

ウェブフォントのテストですよこれは。(A Test To See If RPresentation Works Well With Japanese Web Fonts)
========================================================
author: @yutannihilation
date: 2015年2月7日
css: test.css

Overview
========================================================
This presentation uses Google's [Noto Sans Japan](https://www.google.com/fonts/specimen/Noto+Sans). Red characters are rendered with Noto Sans.

yutannihilation

CREATE DATABASE misc;
use misc;

CREATE TABLE drive_stats (
    date DATE NOT NULL,
    serial_number VARCHAR(32) NOT NULL,
    model VARCHAR(32) NOT NULL,
    capacity_bytes TINYINT NOT NULL,
    failure TINYINT NOT NULL,
    smart_1_normalized TINYINT,

yutannihilation

Soooooooolarized!!!!!
========================================================
author: Hiroaki Yutani
date: 2015/2/11
font-import: http://fonts.googleapis.com/css?family=Bangers
css: solarized_with_webfont.css

solarized
========================================================

yutannihilation

library(dplyr)
library(purrr)
library(ggplot2)
e      <- asNamespace('ggplot2')
Geoms  <- grep("^Geom.+", ls(e), value = TRUE)

geoms  <- 
  Geoms %>%
  map(~ get(., envir = e))

yutannihilation

library(R6)

methods(class = "R6")
#> [1] print.R6*
#>  
#>    Non-visible functions are asterisked

Numbers <- R6Class("Numbers",
                   public = list(
                     x = 100