fix font and spacing of simulation summary

Author: ebey

server.R

@@ -2445,12 +2445,11 @@ output$simsummary <- renderPrint({
   sim <- isolate(model1simreac())
   n <- isolate(input$nsims)
   sum <- list()
-  sum[1] <- "\n"
-  sum[2] <- paste("Number of Networks: ",n, "\n")
-  sum[3] <- paste("Model: ", nwname(),' ~ ',ergm.terms(), "\n")
-  sum[4] <- paste("Reference: ", format(attr(sim,'reference')), "\n")
-  sum[5] <- paste("Constraints: ", format(attr(sim, 'constraints')), "\n")
-  sum[6] <- paste("Parameters: \n")
+  sum[1] <- paste(" Number of Networks: ",n, "\n")
+  sum[2] <- paste("Model: ", nwname(),' ~ ',ergm.terms(), "\n")
+  sum[3] <- paste("Reference: ", format(attr(sim,'reference')), "\n")
+  sum[4] <- paste("Constraints: ", format(attr(sim, 'constraints')), "\n")
+  sum[5] <- paste("Parameters: \n")
   cat(unlist(sum))
 })
 
@@ -2464,6 +2463,13 @@ output$simcoef <- renderPrint({
   write.table(c, quote=FALSE, row.names=FALSE, col.names=FALSE)
 })
 
+output$simstatslabel <- renderPrint({
+  if (input$simButton == 0){
+    return(cat(''))
+  }
+  cat(' Stored network statistics:')
+})
+
 output$simstats <- renderPrint({
   if (input$simButton == 0){
     return(cat(''))

ui.R

@@ -1000,8 +1000,7 @@ url = {http://statnetproject.org}
                                                     wellPanel(
                                                       verbatimTextOutput('simsummary'),
                                                       verbatimTextOutput('simcoef'),
-                                                      p('Stored network statistics:',
-                                                        style='font-family:monospace; margin:0 0 0 2px; font-size:13px;'),
+                                                      verbatimTextOutput('simstatslabel'),
                                                       verbatimTextOutput('simstats')
                                                       )
                                      ),

www/style.css

@@ -128,10 +128,11 @@ div.docpopup {
   background: #FFFFFF;
 }
 
-#simsummary {
+#simsummary,
+#simstatslabel {
   border-style: none;
   padding: 0px;
-  margin: 0px
+  margin: 0px;
 }
 #simcoef,
 #simstats {