nvbn

rasmusab

# Test of Significance, takes the same arguments as t.test() .
signif.test <- function(x, ...) {
  p <- t.test(x, ...)$p.value
  
  # List of p excuses retrieved from http://mchankins.wordpress.com/2013/04/21/still-not-significant-2/
  p_excuses <- c(
    "(barely) not statistically significant <p>",
    "a barely detectable statistically significant difference <p>",
    "a borderline significant trend <p>",
    "a certain trend toward significance <p>",

jboner

Latency Comparison Numbers (~2012)
----------------------------------
L1 cache reference                           0.5 ns
Branch mispredict                            5   ns
L2 cache reference                           7   ns                      14x L1 cache
Mutex lock/unlock                           25   ns
Main memory reference                      100   ns                      20x L2 cache, 200x L1 cache
Compress 1K bytes with Zippy             3,000   ns        3 us
Send 1K bytes over 1 Gbps network       10,000   ns       10 us
Read 4K randomly from SSD*             150,000   ns      150 us          ~1GB/sec SSD

przemoc

#!/bin/bash
# SPDX-License-Identifier: MIT
 
## Copyright (C) 2009 Przemyslaw Pawelczyk <[email protected]>
##
## This script is licensed under the terms of the MIT license.
## https://opensource.org/licenses/MIT
#
# Lockable script boilerplate