
Last chance! 50% off unlimited learning
Sale ends in
iqdensityplot(r, iq = "r")
eyediagram
;
f16pskdemod
; f16pskmod
;
f16qamdemod
; f16qammod
;
f64qamdemod
; f64qammod
;
f8pskdemod
; f8pskmod
;
fNo
; fbpskdemod
;
fbpskmod
; fqpskdemod
;
iqscatterplot
; stemplot
M=4
Es=1
Eb = Es/log2(M)
Nsymbols=1000
Nbits=log2(M)*Nsymbols
bits <- sample(0:1,Nbits, replace=TRUE)
s <- fqpskmod(bits)
EbNodB=4
No = Eb/(10^(EbNodB/10))
n <- fNo(Nsymbols,No,type="complex")
r <- s+n
Run the code above in your browser using DataLab