diff options
| author | Suraj Yerramilli | 2015-09-04 10:25:35 +0530 |
|---|---|---|
| committer | Suraj Yerramilli | 2015-09-04 10:25:35 +0530 |
| commit | 52b4c510bfc3350131dfae1c525950dacc7d0594 (patch) | |
| tree | 0e41b83054599073620ddf47b25131839c06a55f /R/idframe.R | |
| parent | 01531784e9cb874d948c47d445c52c558a2735d2 (diff) | |
| download | SysID-R-code-52b4c510bfc3350131dfae1c525950dacc7d0594.tar.gz SysID-R-code-52b4c510bfc3350131dfae1c525950dacc7d0594.tar.bz2 SysID-R-code-52b4c510bfc3350131dfae1c525950dacc7d0594.zip | |
Converting phase from radians to degrees
Diffstat (limited to 'R/idframe.R')
| -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")) |