Density pixel spacing X

plot(table(pixelX), main='Density plot pixel spacing X')
knitr::kable(rbind(summary(pixelX)))
knitr::kable(cbind("Patient"=unlist(patList), pixelX))

Density pixel spacing Y

plot(table(pixelY), main='Density plot pixel spacing Y')
knitr::kable(rbind(summary(pixelY)))
knitr::kable(cbind("Patient"=unlist(patList), pixelY))

Manufacturer

plot(table(Macchinario), main='Manufacturer')
knitr::kable(rbind(table(Macchinario)))
knitr::kable(cbind("Patient"=unlist(patList), Macchinario))

SeriesDescription

if(!is.na(DescrizioneSerie)){
  plot(table(DescrizioneSerie), main='SeriesDescription')
}
if(!is.na(DescrizioneSerie)){
  knitr::kable(rbind(table(DescrizioneSerie)))
}
if(!is.na(DescrizioneSerie)){
  knitr::kable(cbind("Patient"=unlist(patList), DescrizioneSerie))
}

Slice Thickness

plot(table(SpessoreFetta), main='SliceThickness')
knitr::kable(rbind(summary(SpessoreFetta)))
knitr::kable(cbind("Patient"=unlist(patList), SpessoreFetta))


kbolab/moddicom documentation built on Nov. 29, 2020, 9:11 p.m.