This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| 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')+ |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ### 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... ) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ! 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") |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ! 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") |