ps <- read.csv("PS Alarms.csv")
ps$Alarm.ID <- as.factor(ps$Alarm.ID)
psd <- split(ps, ps$Alarm.Source)
summary(ps)
## Alarm.ID Alarm.Source
## 10254: 29 SGSNMME_01.HW.NF.AA:1976
## 10334: 205 SGSNMME_02.HW.MW.AA:1712
## 11608: 908 SGSNMME_03.HW.KK.AA:1542
## 11609:2108
## 12621: 26
## 14001:1954
Using the app, we can compare which alarms are more prominent on which nodes.
old.par <- par(mfrow=c(1, 3))
plot(psd[[1]]$Alarm.ID, main="Alarms on SGSNMME 01",xlab='Alarm ID', ylab='Count', ylim=c(0,900))
plot(psd[[2]]$Alarm.ID, main="Alarms on SGSNMME 02",xlab='Alarm ID', ylab='Count', ylim=c(0,900))
plot(psd[[3]]$Alarm.ID, main="Alarms on SGSNMME 03",xlab='Alarm ID', ylab='Count', ylim=c(0,900))
par(old.par)
On the PS Network alarms application you have a dropdown menu option for selecting anyone of the nodes to display the alarms including the option to see all the alarms on all of the nodes, as below.
plot(ps$Alarm.ID, main="Alarms on all SGSNMME's", xlab='Alarm ID', ylab='Count', ylim=c(0,2000))
Thank You!