Комментарии 4
Планируете открыть код?
Присоединяюсь к iscsi. было бы очень интересно. покрайне мере использовать их для SVC.
все руки не доходят сделать слив этой инфы в Graphite :/
все руки не доходят сделать слив этой инфы в Graphite :/
Содержательная часть кода всего в 12 строках, вот они:
xmlfile<-xmlParse(«svc.xml»)
output.matr<-c()
string.obj=paste0("//object[@type='",object[i],"']/property")
xml.struct<-getNodeSet(xmlfile, string.obj)
name.obj<-sapply(xml.struct, xmlGetAttr, «name»)
val.obj<-sapply(xml.struct, xmlGetAttr, «value»)
nameCol<-unique(name.obj)
ncols < — length(nameCol)
v_matrix < — matrix(val.obj, ncol=ncols, byrow=TRUE)
data_wide < — data.frame(v_matrix)
names(data_wide)<-nameCol
output.matr[[i]]<-data_wide
xmlfile<-xmlParse(«svc.xml»)
output.matr<-c()
string.obj=paste0("//object[@type='",object[i],"']/property")
xml.struct<-getNodeSet(xmlfile, string.obj)
name.obj<-sapply(xml.struct, xmlGetAttr, «name»)
val.obj<-sapply(xml.struct, xmlGetAttr, «value»)
nameCol<-unique(name.obj)
ncols < — length(nameCol)
v_matrix < — matrix(val.obj, ncol=ncols, byrow=TRUE)
data_wide < — data.frame(v_matrix)
names(data_wide)<-nameCol
output.matr[[i]]<-data_wide
Зарегистрируйтесь на Хабре , чтобы оставить комментарий
Просмотр конфигурации массивов Storwize с R – Shiny Dashboard