De-science scales, needed due to ms -> us scale change

Author: askervin

metrics/report/report_dockerfile/tidy_scaling_nc.R

@@ -7,6 +7,7 @@
 
 suppressMessages(suppressWarnings(library(ggplot2)))	# ability to plot nicely.
 suppressMessages(library(jsonlite))			# to load the data.
+suppressMessages(library(scales))			# For de-science notation of axis
 library(tibble)						# tibbles for tidy data
 
 testnames=c(
@@ -77,12 +78,12 @@ for (currentdir in resultdirs) {
 
 if (length(latencydata[[1]]) <= 20 && perc_count == 5) {
 	# Use boxplot when there are not too many boxes to draw
-	latp = ggplot(data=latencydata, aes(x=n_pods)) + ylab("Latency (ms)") + xlab("pods")
+	latp = ggplot(data=latencydata, aes(x=n_pods)) + ylab("Latency (us)") + xlab("pods") + scale_y_continuous(labels=comma)
 	p=names(ltpt)[2:6]
 	latp = latp + geom_boxplot(aes_string(group="interaction(testname,n_pods)",ymin=p[1],lower=p[2],middle=p[3],upper=p[4],ymax=p[5],fill="testname"),stat="identity")
 } else {
 	# Use colored areas and median lines when there are many ticks on X axis
-	latp = ggplot(data=latencydata, aes(x=n_pods)) + ylab("Latency (ms)") + xlab("pods")
+	latp = ggplot(data=latencydata, aes(x=n_pods)) + ylab("Latency (us)") + xlab("pods") + scale_y_continuous(labels=comma)
 	perc_mid = floor((perc_count)/2)
 	perc_maxdist = perc_mid
 	plot_number = 0