[MediaWiki-commits] [Gerrit] analytics...WDCM-Usage-Dashboard[master]: Usage Dashboard Dec 2017
GoranSMilovanovic has submitted this change and it was merged. ( https://gerrit.wikimedia.org/r/398695 ) Change subject: Usage Dashboard Dec 2017 .. Usage Dashboard Dec 2017 Change-Id: I229d45fc96e581da487effce6497720b319b0234 --- M server.R M ui.R 2 files changed, 37 insertions(+), 12 deletions(-) Approvals: GoranSMilovanovic: Looks good to me, approved jenkins-bot: Verified diff --git a/server.R b/server.R index 5bdfdd6..a57f449 100644 --- a/server.R +++ b/server.R @@ -159,9 +159,27 @@ }) names(unzip_projectTypes) <- search_projectTypes +### --- Fetch update info +setwd('/srv/shiny-server/WDCM_UsageDashboard/update/') +update <- read.csv('toLabsReport.csv', + header = T, + check.names = F, + stringsAsFactors = F, + row.names = 1) + ### --- shinyServer shinyServer(function(input, output, session) { + ### --- output: updateInfo + output$updateInfo <- renderText({ +date <- update$timeStamp[dim(update)[1]] +date <- strsplit(as.character(date), split = " ", fixed = T)[[1]][1] +date <- strsplit(date, split = "-", fixed = T) +date[[1]][2] <- month.name[as.numeric(date[[1]][2])] +date <- paste(unlist(date), collapse = " ") +return(paste("Last update: ", date, "", sep = "")) + }) + ### -- ### --- BASIC FACTS ### -- diff --git a/ui.R b/ui.R index 8a8221b..0caf258 100644 --- a/ui.R +++ b/ui.R @@ -25,20 +25,27 @@ # - fluidRow Title fluidRow( - column(width = 12, - h2('WDCM Usage Dashboard'), - HTML('Wikidata Concepts Monitor') - + column(width = 5, + fluidRow( + column(width = 3, + img(src = 'Wikidata-logo-en.png', + align = "left") + ), + column(width = 1), + column(width = 8, + h1('WDCM Usage Dashboard'), + HTML('Wikidata Concepts Monitor') + ) ) + ), + column(width = 7, + br(), + HTML('Interactive visualizations of Wikidata use by other Wikimedia projects.'), + HTML('https://www.wikidata.org/wiki/Wikidata:Wikidata_Concepts_Monitor"; target="_blank">Visit the WDCM wiki page'), + HTML('Did you spot a bug, a missing label, or wrong data? https://www.wikidata.org/wiki/Wikidata:Wikidata_Concepts_Monitor/UserFeedback"; target="_blank">Give us feedback here'), + htmlOutput('updateInfo') + ) ), # - fluidRow Title END - -# - fluidRow Logo -fluidRow( - column(width = 12, - img(src='Wikidata-logo-en.png', - align = "left") - ) -), # - fluidRow END # - hr() fluidRow( -- To view, visit https://gerrit.wikimedia.org/r/398695 To unsubscribe, visit https://gerrit.wikimedia.org/r/settings Gerrit-MessageType: merged Gerrit-Change-Id: I229d45fc96e581da487effce6497720b319b0234 Gerrit-PatchSet: 1 Gerrit-Project: analytics/wmde/WDCM-Usage-Dashboard Gerrit-Branch: master Gerrit-Owner: GoranSMilovanovic Gerrit-Reviewer: GoranSMilovanovic Gerrit-Reviewer: jenkins-bot <> ___ MediaWiki-commits mailing list MediaWiki-commits@lists.wikimedia.org https://lists.wikimedia.org/mailman/listinfo/mediawiki-commits
[MediaWiki-commits] [Gerrit] analytics...WDCM-Usage-Dashboard[master]: Usage Dashboard Dec 2017
GoranSMilovanovic has uploaded a new change for review. ( https://gerrit.wikimedia.org/r/398695 ) Change subject: Usage Dashboard Dec 2017 .. Usage Dashboard Dec 2017 Change-Id: I229d45fc96e581da487effce6497720b319b0234 --- M server.R M ui.R 2 files changed, 37 insertions(+), 12 deletions(-) git pull ssh://gerrit.wikimedia.org:29418/analytics/wmde/WDCM-Usage-Dashboard refs/changes/95/398695/1 diff --git a/server.R b/server.R index 5bdfdd6..a57f449 100644 --- a/server.R +++ b/server.R @@ -159,9 +159,27 @@ }) names(unzip_projectTypes) <- search_projectTypes +### --- Fetch update info +setwd('/srv/shiny-server/WDCM_UsageDashboard/update/') +update <- read.csv('toLabsReport.csv', + header = T, + check.names = F, + stringsAsFactors = F, + row.names = 1) + ### --- shinyServer shinyServer(function(input, output, session) { + ### --- output: updateInfo + output$updateInfo <- renderText({ +date <- update$timeStamp[dim(update)[1]] +date <- strsplit(as.character(date), split = " ", fixed = T)[[1]][1] +date <- strsplit(date, split = "-", fixed = T) +date[[1]][2] <- month.name[as.numeric(date[[1]][2])] +date <- paste(unlist(date), collapse = " ") +return(paste("Last update: ", date, "", sep = "")) + }) + ### -- ### --- BASIC FACTS ### -- diff --git a/ui.R b/ui.R index 8a8221b..0caf258 100644 --- a/ui.R +++ b/ui.R @@ -25,20 +25,27 @@ # - fluidRow Title fluidRow( - column(width = 12, - h2('WDCM Usage Dashboard'), - HTML('Wikidata Concepts Monitor') - + column(width = 5, + fluidRow( + column(width = 3, + img(src = 'Wikidata-logo-en.png', + align = "left") + ), + column(width = 1), + column(width = 8, + h1('WDCM Usage Dashboard'), + HTML('Wikidata Concepts Monitor') + ) ) + ), + column(width = 7, + br(), + HTML('Interactive visualizations of Wikidata use by other Wikimedia projects.'), + HTML('https://www.wikidata.org/wiki/Wikidata:Wikidata_Concepts_Monitor"; target="_blank">Visit the WDCM wiki page'), + HTML('Did you spot a bug, a missing label, or wrong data? https://www.wikidata.org/wiki/Wikidata:Wikidata_Concepts_Monitor/UserFeedback"; target="_blank">Give us feedback here'), + htmlOutput('updateInfo') + ) ), # - fluidRow Title END - -# - fluidRow Logo -fluidRow( - column(width = 12, - img(src='Wikidata-logo-en.png', - align = "left") - ) -), # - fluidRow END # - hr() fluidRow( -- To view, visit https://gerrit.wikimedia.org/r/398695 To unsubscribe, visit https://gerrit.wikimedia.org/r/settings Gerrit-MessageType: newchange Gerrit-Change-Id: I229d45fc96e581da487effce6497720b319b0234 Gerrit-PatchSet: 1 Gerrit-Project: analytics/wmde/WDCM-Usage-Dashboard Gerrit-Branch: master Gerrit-Owner: GoranSMilovanovic ___ MediaWiki-commits mailing list MediaWiki-commits@lists.wikimedia.org https://lists.wikimedia.org/mailman/listinfo/mediawiki-commits