From b63fbbe3c91f624edc923a7cd7d1def27343b1a4 Mon Sep 17 00:00:00 2001
From: Andreas Gammelgaard Damsbo <andreas@gdamsbo.dk>
Date: Tue, 27 Feb 2024 12:43:29 +0100
Subject: [PATCH] documented dataset for shiny testing

---
 R/mtcars_redcap.R      |  23 +++++++++++++++++++++++
 data/mtcars_redcap.rda | Bin 0 -> 1490 bytes
 man/deploy_shiny.Rd    |  23 +++++++++++++++++++++++
 man/mtcars_redcap.Rd   |  32 ++++++++++++++++++++++++++++++++
 4 files changed, 78 insertions(+)
 create mode 100644 R/mtcars_redcap.R
 create mode 100644 data/mtcars_redcap.rda
 create mode 100644 man/deploy_shiny.Rd
 create mode 100644 man/mtcars_redcap.Rd

diff --git a/R/mtcars_redcap.R b/R/mtcars_redcap.R
new file mode 100644
index 0000000..4079bca
--- /dev/null
+++ b/R/mtcars_redcap.R
@@ -0,0 +1,23 @@
+#' mtcars dataset slightly modified to use for Shiny app upload demonstration
+#'
+#'
+#' @format A data frame with 13 variables:
+#' \describe{
+#'   \item{record_id}{ID, numeric}
+#'   \item{mpg}{ID, numeric}
+#'   \item{cyl}{ID, numeric}
+#'   \item{disp}{ID, numeric}
+#'   \item{hp}{ID, numeric}
+#'   \item{drat}{ID, numeric}
+#'   \item{wt}{ID, numeric}
+#'   \item{qsec}{ID, numeric}
+#'   \item{vs}{ID, numeric}
+#'   \item{am}{ID, numeric}
+#'   \item{gear}{ID, numeric}
+#'   \item{carb}{ID, numeric}
+#'   \item{name}{original rownames, charater}
+#'
+#' }
+#' @usage data(mtcars_redcap)
+"mtcars_redcap"
+
diff --git a/data/mtcars_redcap.rda b/data/mtcars_redcap.rda
new file mode 100644
index 0000000000000000000000000000000000000000..8495911c22b4007c3f4673b1cf0f0c0613e6e20d
GIT binary patch
literal 1490
zcmV;@1ugnQT4*^jL0KkKS+z8bE&v6`fB*mg|Nqo?|NsB?{oTL+|NcS%pfpSc7(iJD
zV1Z!{OLI^KxF@hSGeZHQkOY#6l4+7KnjV^JZ8aW^si?wfqeCDVk5C7s2dEkvG&I5h
z4GjQjdWWd=o}va!5t9Nm#5BS&4KM*15rBgxnGG2Y0f~T^h5}+V(-Q(<5)@5UKLk_q
zHBCK6pQSX~hpC7(H1vj=0QEG`(8$mRBS19tfsh7(8UO$wWWgCQBTPd~BM{R75rG&8
zGHH;}kkA;I35Z}OBTX?dCIG60G$2hHDY2?;PbvDN%4w$5dQVUQG(A87XgsDzlmVa(
z00w~dGynnZp9jzQQFgQTr7Ck-TGp1K8jjVg)u6{p*jh~uplojJbjaInf@N3{vZQQ}
zXw21NH0uhE5Nbp>Hz!%w>vhjtdB68K97D<2(n!mZxfVu;nN{>j2+gSgNooaR2yF;K
zbdVvnnv^uywAw{eLcYb)(gx$F)#qx0e0v!6^lUB1K6NgEfriP8wlxqzd3!qg&u4$M
zz}neI+gT2Xh#h*a03>FxE<p*zkP2%EKu3EgKPvM-G5p@-IHM07(s>Y=I2Lg8i|bxP
z6O^78hUA=QwCx;qiz3Q!5?ak@urpdF<)kjm0Bk^-5SPi#5f=5Mw&d{XBW!Ud#TYgb
zp*BX^DPSxva4U03D>Q+F0Vp)nk`1W{k!=}%&_#w^#3XvGQKQEgK-h6GLrI~e2x)-W
z!;wD}hLY%56+>+eS;Qs`?;Z$6B?=3H6k<TbU6G9q4Xp=-loR@qaK%b7h5?Go*9D-I
zmPA%&6RbgLIwDErOeK<l*c2p&vrRM{w3!s5P~f<V%UKg-M7pgN<?HWl4Xq7|Am&B{
z=MS>tT4<NPIYH33oHWr^<DoIE^II;N6)-qTr9o@mNW*bdA$&Da0roHBe9rlJ27Tp(
zXwMuWo?#h5Rbm(S7I4)|0d+4GA>l3wn>0aFW$9}yH$$d)9_j5`P~S^GLO2+dHu_#4
zHKn`}1zf1%yHoVz_F9Ks`998xTCg}mrD3JI=ldbJ?{Z(|VdAd7Htq1+7u_moV=&O?
znkvFI8VJ!$ce$C@;beLKWH2!!E7@=5BaO#;msd^Y(!+bBx|GSIF<fG%gU&jKY`@I5
zmHCqSda+uVs1+M1IL6au%oLYV3XG`2F-#nC#{}UV!;Wf~9*DrPmZ}_tQfs-28t+Bd
zC^lNI-YbzqElUDy$gZM`v0ioT9|y?fu%gRJ6j_E+`ui<fh-yK#zm+v1y<uK@5=or6
zk16EfRGKMCy^N-WQ0dVBv3C%n1u;S}c%C;IxZG{3c;!hF^<vys+ifUP^4+UqYnNeL
zxp`cO)brBfuv1xvO&7A6olI98RFbhu5Tvtr7XiDLx2?Lnb-Iiu=A8YNFfXlUxvdAK
z3(PTdijiPc%utGK)FGt$S5_ET;pjkwKbSvxR9vIvG;grsVD#R8GO&<KEo@3tOOgi(
z1+c>sNdatqV-&WPx;Dzh?ObLv{v1UYj5egmsi@U(lq6XwLw&>RCj6HcG3)6~N-Rb6
zmy$(EeZgZ^rJj=$RVL$Mp!Jlu+6yZtR>;O_x#iEm#ig;Gh`dwBXq)}!Q>j8sN{b{}
zaYqaa@&`xQO5A-hyV$%u)J&lhSvr)`X0n;pGFZP2yI9yIQ;4}oK}%Ia=@tSvRI%Vm
zN+eY#wx=z1n474Z0@O*x>>>KW+gMjG1$huU$l<V`K8=G1MY2m)oh>^{`jook0kP>k
zlBO<JI%w{*Ayo6EF4Rt>ZSHr&?<Mtq$gG@PM=VA`gGn0AZF8cbb9Ea*D0sOPavrF{
zSG*ejc77u@JuyXPgvk`)=zuBZ(;1aNinf_I+)P&kFvANA9qNbr?3C&Wc&45+k^2as
sHC707OBf`Gsxn4hy!hC{0~&!;S)9p^q@N@<xNrEok}1N3g{h=ra6&Px{Qv*}

literal 0
HcmV?d00001

diff --git a/man/deploy_shiny.Rd b/man/deploy_shiny.Rd
new file mode 100644
index 0000000..5104cc3
--- /dev/null
+++ b/man/deploy_shiny.Rd
@@ -0,0 +1,23 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/shiny_cast.R
+\name{deploy_shiny}
+\alias{deploy_shiny}
+\title{Deploy the Shiny app with rsconnect}
+\usage{
+deploy_shiny(path = here::here("app/"), name.app = "shiny_cast")
+}
+\arguments{
+\item{path}{app folder path}
+
+\item{name.app}{name of deployed app}
+}
+\value{
+deploy
+}
+\description{
+Deploy the Shiny app with rsconnect
+}
+\examples{
+# deploy_shiny
+
+}
diff --git a/man/mtcars_redcap.Rd b/man/mtcars_redcap.Rd
new file mode 100644
index 0000000..8bbab01
--- /dev/null
+++ b/man/mtcars_redcap.Rd
@@ -0,0 +1,32 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/mtcars_redcap.R
+\docType{data}
+\name{mtcars_redcap}
+\alias{mtcars_redcap}
+\title{mtcars dataset slightly modified to use for Shiny app upload demonstration}
+\format{
+A data frame with 13 variables:
+\describe{
+  \item{record_id}{ID, numeric}
+  \item{mpg}{ID, numeric}
+  \item{cyl}{ID, numeric}
+  \item{disp}{ID, numeric}
+  \item{hp}{ID, numeric}
+  \item{drat}{ID, numeric}
+  \item{wt}{ID, numeric}
+  \item{qsec}{ID, numeric}
+  \item{vs}{ID, numeric}
+  \item{am}{ID, numeric}
+  \item{gear}{ID, numeric}
+  \item{carb}{ID, numeric}
+  \item{name}{original rownames, charater}
+
+}
+}
+\usage{
+data(mtcars_redcap)
+}
+\description{
+mtcars dataset slightly modified to use for Shiny app upload demonstration
+}
+\keyword{datasets}