Skip to content

Instantly share code, notes, and snippets.

@AndreaCirilloAC
AndreaCirilloAC / bike_sharing.R
Created August 22, 2016 07:42
bike sharing in washington by season
library(rio)
library(dplyr)
library(ggplot2)
# data from: https://www.kaggle.com/c/bike-sharing-demand/data
rides_stat <- import ("train.csv")
rides_stat %>%
group_by(season) %>%
summarise(total_rides = sum(count),mean_temp = mean(temp)) %>%
ggplot(aes(x=season,y=total_rides, fill = mean_temp)) +
geom_bar(stat='identity')+
@rasmusab
rasmusab / tensorflow_in_r_using_rpython.R
Last active April 25, 2018 02:35
An example of building a TensorFlow model from R using rPython
### An example of building a TensorFlow model from R using rPython ###
# For this script you need to
# 1. Have python 2.7 installed.
# 2. Install the rPython package in R.
# 3. Install Google's TensorFlow library as per these instructions:
# http://www.tensorflow.org/get_started/os_setup.md#binary_installation
### Here is how to setup and run a trivial TensorFlow model ###
# Load TensorFlow (I couldn't get this to work without setting sys.argv... )
@PatricZhao
PatricZhao / nvtx.F90
Last active August 29, 2015 14:23 — forked from jefflarkin/nvtx.F90
! Fortran bindings for a small subset of the NVIDIA Tools Extensions library
module nvtx
use iso_c_binding
public :: nvtxrangepusha, nvtxrangepop
public :: nvtxrangepushaargb
interface
! Annotate the timeline with a message
! Parameters:
! * string : the message in a string format
subroutine nvtxrangepusha(string) bind(C, name="nvtxRangePushA")
@jefflarkin
jefflarkin / nvtx.F90
Last active February 21, 2023 16:57
Simple Fortran bindings to a subset of the NVTX library.
! Fortran bindings for a small subset of the NVIDIA Tools Extensions library
module nvtx
use iso_c_binding
public :: nvtxrangepusha, nvtxrangepop
public :: nvtxrangepushaargb
interface
! Annotate the timeline with a message
! Parameters:
! * string : the message in a string format
subroutine nvtxrangepusha(string) bind(C, name="nvtxRangePushA")