summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--README.md29
-rwxr-xr-xpackageinstall.sh20
-rw-r--r--requirements.txt6
-rw-r--r--run.R4
4 files changed, 50 insertions, 9 deletions
diff --git a/README.md b/README.md
index 2954027..7d8bea8 100644
--- a/README.md
+++ b/README.md
@@ -1,19 +1,29 @@
# R_on_Cloud_Web_API
+Run following Steps :
+1) Install R on machine.
+2) $ chmod +X packageinstall.sh
+3) $ ./packageinstall.sh
+4) $ Rscript run.R
+5) Check in browser http://127.0.0.1:8001/__swagger__/
+
+**----------------------------------------------------------------------------**
**Run on local R console:**
R version 3.4.4
-
+
**Requirements preinstalled R packages:**
-
- install.packages("plumber")
- install.packages("jsonlite")
- install.packages("readr")
- install.packages("futile.logger")
- install.packages("tryCatchLog")
- install.packages("ggplot2")
- ------------------------------------------
+
+ 1) install.packages("plumber")
+ 2) install.packages("jsonlite")
+ 3) install.packages("readr")
+ 4) install.packages("futile.logger")
+ 5) install.packages("tryCatchLog")
+ 6) install.packages("ggplot2")
+**----------------------------------------------------------------------------**
+
+ #run.R
> library(plumber)
> r <- plumb("plumber.R") # Where 'plumber.R' is the location of the file shown above
> r$run(port=8001)
@@ -28,3 +38,4 @@ R version 3.4.4
+
diff --git a/packageinstall.sh b/packageinstall.sh
new file mode 100755
index 0000000..d99af8d
--- /dev/null
+++ b/packageinstall.sh
@@ -0,0 +1,20 @@
+#!/usr/bin/bash
+while IFS=" " read -r pkg;
+do
+
+
+ [ -z ${pkg} ] && help
+
+ REXEC=$(which R)
+
+ if [ -z ${REXEC} ]; then
+ echo "R not found, please ensure R is available and try again."
+ exit 1
+ fi
+
+ echo "install.packages(\"${pkg}\", repos=\"https://cran.rstudio.com/\")" | R --no-save
+done < requirements.txt
+
+
+
+
diff --git a/requirements.txt b/requirements.txt
new file mode 100644
index 0000000..65f77c2
--- /dev/null
+++ b/requirements.txt
@@ -0,0 +1,6 @@
+plumber
+jsonlite
+readr
+futile.logger
+tryCatchLog
+ggplot2 \ No newline at end of file
diff --git a/run.R b/run.R
new file mode 100644
index 0000000..6733c2e
--- /dev/null
+++ b/run.R
@@ -0,0 +1,4 @@
+
+library(plumber)
+r <- plumb("plumber.R") # Where 'plumber.R' is the location of the file shown above
+r$run(host="0.0.0.0", port=8001, swagger=TRUE) \ No newline at end of file