au-phd/PhysicalActivityandStrokeOutcome
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

small eds

Browse Source
This commit is contained in:
AG Damsbo 2022-08-19 11:06:48 +02:00
parent e0d089341c
commit eed7723efa
3 changed files with 23 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
REDCap/convert_redcap.R
View File

@ -1,3 +1,5 @@
## This approach is based on a folder with several data files to upload to an empty data base
## Bulk conversion of stata files to CSV ## Bulk conversion of stata files to CSV
library(haven) library(haven)
library(dplyr) library(dplyr)

6
apps/Index app/rsconnect/shinyapps.io/cognitiveindex/index_app.dcf
View File

@ -5,7 +5,7 @@ account: cognitiveindex
server: shinyapps.io server: shinyapps.io
hostUrl: https://api.shinyapps.io/v1 hostUrl: https://api.shinyapps.io/v1
appId: 6803928 appId: 6803928
bundleId: 6217041 bundleId: 6217136
url: https://cognitiveindex.shinyapps.io/index_app/ url: https://cognitiveindex.shinyapps.io/index_app/
when: 1660896651.6136 when: 1660899020.73485
lastSyncTime: 1660896651.61362 lastSyncTime: 1660899020.73486

36
apps/Index app/server.R
View File

@ -50,24 +50,24 @@ server <- function(input, output, session) {
raw_columns=c("imm","vis","ver","att","del")) raw_columns=c("imm","vis","ver","att","del"))
colnames(df)<-c("id", colnames(df)<-c("id",
"immediate_is", "a_is",
"visuospatial_is", "b_is",
"verbal_is", "c_is",
"attention_is", "d_is",
"delayed_is", "e_is",
"total_is", "i_is",
"immediate_ci", "a_ci",
"visuospatial_ci", "b_ci",
"verbal_ci", "c_ci",
"attention_ci", "d_ci",
"delayed_ci", "e_ci",
"total_ci", "i_ci",
"immediate_per", "a_per",
"visuospatial_per", "b_per",
"verbal_per", "c_per",
"attention_per", "d_per",
"delayed_per", "e_per",
"total_per") "i_per")
return(df) return(df)
}) })