p <- s / m * 100
m_down_speed <- as.numeric(file_size)*1024 / m
+"avg"
m
+"sd"
s
+"rsd"
p
m_down_speed
--- /dev/null
+tsup-1t-3-01 64
+tsup-1t-3-02 256
+tsup-1t-3-03 1024
+tsup-1t-3-04 64
+tsup-1t-3-05 256
+tsup-1t-3-06 1024
+tsup-1t-3-07 64
+tsup-1t-3-08 256
+tsup-1t-3-09 1024
+tsup-1t-3-10 64
+tsup-1t-3-11 256
+tsup-1t-3-12 1024
+tsup-1t-3-13 64
+tsup-1t-3-14 256
+tsup-1t-3-15 1024
+tsup-mta-3-01 64
+tsup-mta-3-02 256
+tsup-mta-3-03 1024
+tsup-mta-3-04 64
+tsup-mta-3-05 256
+tsup-mta-3-06 1024
+tsup-mta-3-07 64
+tsup-mta-3-08 256
+tsup-mta-3-09 1024
+tsup-mta-3-10 64
+tsup-mta-3-11 256
+tsup-mta-3-12 1024
+tsup-mta-3-13 64
+tsup-mta-3-14 256
+tsup-mta-3-15 1024