Day: May 3, 2014

Keying by a built-in keyer of IC-7410 sending a message “cq cq cq de..”, monitored by its side-tone.

> hist(mydata$V1,xlim=c(0,1500),breaks=th,col="green",main="Dot/Dash Histogram")
> dash=subset(mydata$V1,mydata$V1>750)
> dot=subset(mydata$V1,mydata$V1<750)
> mean(dash)
[1] 1157.661
> mean(dot)
[1] 374.7907
> sd(dash)
[1] 2.592192
> sd(dot)
[1] 2.454909
> mean(dash)/mean(dot)
[1] 3.088821

> hist(mydata2$V1,xlim=c(2750,2770),breaks=th2,col="red",main="Space Histogram")
> sp1=subset(mydata2$V1,mydata2$V1<750)
> sp2=subset(mydata2$V1,mydata2$V1>750 & mydata2$V1 <2000)
> sp3=subset(mydata2$V1,mydata2$V1>2000)
> mean(s1)
[1] 409.5067
> sd(s1)
[1] 2.177113
> mean(s2)
[1] 1191.238
> sd(s2)
[1] 2.047065
> mean(s3)
[1] 2763.75
> sd(s3)
[1] 1.669046
> mean(sp2)/mean(sp1)
[1] 2.908959
> mean(sp3)/mean(sp1)
[1] 6.748974