diff options
| -rw-r--r-- | R/idframe.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/idframe.R b/R/idframe.R index 42fea24..b794661 100644 --- a/R/idframe.R +++ b/R/idframe.R @@ -153,7 +153,7 @@ plot.idfrd <- function(x){ require(ggplot2);require(reshape2);require(signal) mag <- 20*log10(Mod(x$resp)) - phase <- unwrap(Arg(x$resp)) + phase <- 180/pi*unwrap(Arg(x$resp)) sys_df <- data.frame(Frequency = x$freq,Gain = mag,Phase = phase) melted_sys_df <- melt(sys_df, id.var = c("Frequency")) |