http://magma.ua4vjlx72wv5crhkificaeysp62hizhazipfshsdvs6jxqvhtkpllcad.onion/guide/data-analysis.html
. # x$url < - factor(x$url, levels = overall$url[order(overall$blocking, overall$N)]) # Discard URLs that have a zero rate of overall blocking. x < - x [ overall [ blocking > 0 ] , , on = . ( url ) ] # Put asn in numeric order. x [ , asn : = factor ( asn , levels = unique ( x $ asn [ order ( as.integer ( sub ( " ^AS " , " " , x $ asn ) ) ) ] ) ) ] x $ anomaly_type < - ifelse ( x $ blocked == " false " , " none " , x $ blocking_type ) x $ anomaly_type < - relevel ( factor ( x $ anomaly_type ) , " none " )...