diff --git a/eoa/server.R b/eoa/server.R
index d4b734c..82deb1f 100644
--- a/eoa/server.R
+++ b/eoa/server.R
@@ -22,14 +22,17 @@ shinyServer(function(input, output, session) {
   
   eoa_stats <- reactive({
     
+    da <- length(unique(results()$date))
+    
     eoa_activity <- list(
-      "TX Count" = sum(results()$NUM_TX),
-      "Days Active" = length(unique(results()$date)),
+      "Transactions" = sum(results()$NUM_TX),
+      "Days Active" = da,
       "Activity Score" = {
+        
         paste0(
           100 * 
             round(
-              eoa_daily_history[eoa_daily_history$UNIQUE_DAYS == length(unique(results()$date)), "eoa_cumprop"],
+              eoa_daily_history[eoa_daily_history$UNIQUE_DAYS == da, "eoa_cumprop"],
               4)
         )
       }
diff --git a/eoa/ui.R b/eoa/ui.R
index fa56e35..673ae28 100644
--- a/eoa/ui.R
+++ b/eoa/ui.R
@@ -68,25 +68,24 @@ shinyUI(fluidPage(
         class = 'chart-block',
         div(class = 'chart-title', span('Your ETH Activity')),
         div(class = 'chart',
-              div(class = 'heat',
-              conditionalPanel("input.submit > 0",
-                                   uiOutput('heatmap')) 
-            ),
             fluidRow(
               column(3,
                      conditionalPanel("input.submit > 0",
                                       div(class = 'eoa-tbl',
                                           uiOutput('compare'))
+                     )),
+              column(9, 
+                     div(class = 'heat',
+                         conditionalPanel("input.submit > 0",
+                                          uiOutput('heatmap'))
                      )
-          ),
-          column(9,
-                   plotlyOutput("main_plot")
-                 )
+              )
+            ),
+            plotlyOutput("main_plot")
         )
-       )
       )
     )
-  
+    
 ) # end FluidPage
 ) # end shinyUI