R: Experiment 1: Load the data, then extract relevant RTP packets

Starting with a tab-separated file of the form:

"No." "Time" "Source" "Destination“ "Protocol“
"RSSI" "Info“

"1443" "17685.760952" "90.226.255.70" "217.211.xx.xx" "RTP" "" "PT=ITU-T G.711 PCMA, SSRC=0x6E21893F, Seq=183, Time=46386 “

data1<-read.table("one-call.tab", sep="\t", header=TRUE, stringsAsFactors = FALSE)

Extract the traffic going to me:

To_Chip<-subset(data1, Source == "90.226.255.70", drop=TRUE)

Extract only the RTP protocol packets:

To_Chip_RTP<-subset(To_Chip, Protocol == "RTP", drop=TRUE)

Transcript

We take the same data captured with Wireshark, and we now extract the data.