shiny-generator 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 0c4a736724a930d0ca89a5617bc55c3dbab3b981
+  data.tar.gz: 9731cfa61cd416bddd93ff2903e6038e2f0dbaa4
+SHA512:
+  metadata.gz: 0d08ed2e07e1a8e2f3883380266218350a7464241ca712c352d3dcc317359d86ddfb82b2377188a09e1d41b4ad0a3f6da25dd2d8707f43489c94e31ad8a434ee
+  data.tar.gz: 67b394419698fb487d83babd08170e00103f8b68b4ad8f5f93dc9b6721ced7591635b1555a1d478db5130a9028d7812f4721af7724adfbb59725f1ec75c7c054

data/.gitignore

@@ -0,0 +1,9 @@
+/.bundle/
+/.yardoc
+/Gemfile.lock
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/

data/.travis.yml

@@ -0,0 +1,3 @@
+language: ruby
+rvm:
+  - 2.3.0

data/Gemfile

@@ -0,0 +1,5 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in shiny-generator.gemspec
+
+gemspec

data/README.md

@@ -0,0 +1,37 @@
+# Shiny::Generator
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'shiny-generator'
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install shiny-generator
+
+## Usage
+
+```ruby
+require 'shiny/generator'
+```
+
+## Development
+
+After checking out the repo, run `bin/setup` to install dependencies. Then, run `bin/console` for an interactive prompt that will allow you to experiment.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release` to create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+1. Fork it ( https://github.com/[my-github-username]/shiny-generator/fork )
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create a new Pull Request

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "shiny/generator"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start

data/bin/setup

@@ -0,0 +1,7 @@
+#!/bin/bash
+set -euo pipefail
+IFS=$'\n\t'
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/lib/shiny/generator.rb

@@ -0,0 +1,10 @@
+require "shiny/generator/version"
+require "shiny/generator/scraper"
+require "shiny/generator/template"
+
+module Shiny
+  module Generator
+    # Your code goes here...
+  end
+end
+

data/lib/shiny/generator/scraper.rb

@@ -0,0 +1,12 @@
+module Shiny
+  module Generator
+    class Scraper
+      def initialize
+        #for debug
+        puts "hello world"
+      end
+
+    end
+  end
+end
+

data/lib/shiny/generator/template.rb

@@ -0,0 +1,22 @@
+module Shiny
+  module Generator
+    class Template
+      def create 
+        dir = File.expand_path File.dirname(__FILE__)
+        @ui_r = open("#{dir}/template1/ui.R","r").read
+        @server_r = open("#{dir}/template1/server.R","r").read
+        `if [ ! -d "shiny" ]; then
+          mkdir shiny 
+         fi`
+        ui_r = open("shiny/ui.R","w")  
+        server_r = open("shiny/server.R","w")  
+        ui_r.write(@ui_r)
+        server_r.write(@server_r)
+        ui_r.close
+        server_r.close
+      end
+
+    end
+
+  end
+end

data/lib/shiny/generator/template1/server.R

@@ -0,0 +1,22 @@
+shinyServer(function(input, output) {
+
+  output$main_plot <- renderPlot({
+
+    hist(faithful$eruptions,
+      probability = TRUE,
+      breaks = as.numeric(input$n_breaks),
+      xlab = "Duration (minutes)",
+      main = "Geyser eruption duration")
+
+    if (input$individual_obs) {
+      rug(faithful$eruptions)
+    }
+
+    if (input$density) {
+      dens <- density(faithful$eruptions,
+          adjust = input$bw_adjust)
+      lines(dens, col = "blue")
+    }
+
+  })
+})

data/lib/shiny/generator/template1/ui.R

@@ -0,0 +1,25 @@
+shinyUI(bootstrapPage(
+
+  selectInput(inputId = "n_breaks",
+      label = "Number of bins in histogram (approximate):",
+      choices = c(10, 20, 35, 50),
+      selected = 20),
+
+  checkboxInput(inputId = "individual_obs",
+      label = strong("Show individual observations"),
+      value = FALSE),
+
+  checkboxInput(inputId = "density",
+      label = strong("Show density estimate"),
+      value = FALSE),
+
+  plotOutput(outputId = "main_plot", height = "300px"),
+
+  # Display this only if the density is shown
+  conditionalPanel(condition = "input.density == true",
+    sliderInput(inputId = "bw_adjust",
+        label = "Bandwidth adjustment:",
+        min = 0.2, max = 2, value = 1, step = 0.2)
+  )
+
+))

data/lib/shiny/generator/version.rb

@@ -0,0 +1,5 @@
+module Shiny
+  module Generator
+    VERSION = "0.1.0"
+  end
+end

data/sample/sample.rb

@@ -0,0 +1,13 @@
+require 'rubygems'
+require 'nokogiri'
+require 'open-uri'
+
+$:.unshift File.expand_path("./lib"), File.dirname(__FILE__)
+
+require 'shiny/generator'
+
+s = Shiny::Generator::Template.new
+s.create
+
+`R -e "shiny::runApp('shiny')"`
+

data/shiny-generator.gemspec

@@ -0,0 +1,31 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'shiny/generator/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "shiny-generator"
+  spec.version       = Shiny::Generator::VERSION
+  spec.authors       = ["Shohei Aoki"]
+  spec.email         = ["shoaok@gmail.com"]
+
+  spec.summary       = %q{R Shiny WebApp generator}
+  spec.description   = %q{Easy scraping and visualizing with R Shiny}
+  spec.homepage      = "https://github.com/shohei/shiny-generator"
+
+  # Prevent pushing this gem to RubyGems.org by setting 'allowed_push_host', or
+  # delete this section to allow pushing this gem to any host.
+  # if spec.respond_to?(:metadata)
+  #   spec.metadata['allowed_push_host'] = "TODO: Set to 'http://mygemserver.com'"
+  # else
+  #   raise "RubyGems 2.0 or newer is required to protect against public gem pushes."
+  # end
+
+  spec.files         = `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  spec.bindir        = "exe"
+  spec.executables   = spec.files.grep(%r{^exe/}) { |f| File.basename(f) }
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.9"
+  spec.add_development_dependency "rake", "~> 10.0"
+end

data/shiny/server.R

@@ -0,0 +1,22 @@
+shinyServer(function(input, output) {
+
+  output$main_plot <- renderPlot({
+
+    hist(faithful$eruptions,
+      probability = TRUE,
+      breaks = as.numeric(input$n_breaks),
+      xlab = "Duration (minutes)",
+      main = "Geyser eruption duration")
+
+    if (input$individual_obs) {
+      rug(faithful$eruptions)
+    }
+
+    if (input$density) {
+      dens <- density(faithful$eruptions,
+          adjust = input$bw_adjust)
+      lines(dens, col = "blue")
+    }
+
+  })
+})

data/shiny/ui.R

@@ -0,0 +1,25 @@
+shinyUI(bootstrapPage(
+
+  selectInput(inputId = "n_breaks",
+      label = "Number of bins in histogram (approximate):",
+      choices = c(10, 20, 35, 50),
+      selected = 20),
+
+  checkboxInput(inputId = "individual_obs",
+      label = strong("Show individual observations"),
+      value = FALSE),
+
+  checkboxInput(inputId = "density",
+      label = strong("Show density estimate"),
+      value = FALSE),
+
+  plotOutput(outputId = "main_plot", height = "300px"),
+
+  # Display this only if the density is shown
+  conditionalPanel(condition = "input.density == true",
+    sliderInput(inputId = "bw_adjust",
+        label = "Bandwidth adjustment:",
+        min = 0.2, max = 2, value = 1, step = 0.2)
+  )
+
+))

metadata

@@ -0,0 +1,89 @@
+--- !ruby/object:Gem::Specification
+name: shiny-generator
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Shohei Aoki
+autorequire: 
+bindir: exe
+cert_chain: []
+date: 2015-08-05 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.9'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.9'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.0'
+description: Easy scraping and visualizing with R Shiny
+email:
+- shoaok@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".travis.yml"
+- Gemfile
+- README.md
+- Rakefile
+- bin/console
+- bin/setup
+- lib/shiny/generator.rb
+- lib/shiny/generator/scraper.rb
+- lib/shiny/generator/template.rb
+- lib/shiny/generator/template1/server.R
+- lib/shiny/generator/template1/ui.R
+- lib/shiny/generator/version.rb
+- sample/sample.rb
+- shiny-generator.gemspec
+- shiny/server.R
+- shiny/ui.R
+homepage: https://github.com/shohei/shiny-generator
+licenses: []
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.5
+signing_key: 
+specification_version: 4
+summary: R Shiny WebApp generator
+test_files: []
+has_rdoc: