grayToDensity {CTRing} | R Documentation |
Convert from 8bit gray scale to density
Description
Convert from 8bit gray scale to density
Usage
grayToDensity(im, a = -0.1321, b = 0.01834)
Arguments
im |
Matrix of CT scan image in 8bit gray scale |
a |
Intercept of the calibration curve |
b |
Slope of the calibration curve |
Value
Matrix of density values
Examples
library(oro.dicom)
file_path <- system.file("extdata", "disk.dcm", package = "CTRing")
dcm <- readDICOM(file_path)
hdr_df <- dcm$hdr[[1]]
image_info <- getImageInfo(hdr = hdr_df)
im <- imageToMatrix(dcm$img)
im_8bit <- xBitTo8Bit(im, image_info$grayScale)
range(im_8bit)
im_dens <- grayToDensity(im_8bit)
range(im_dens)
[Package CTRing version 0.1.0 Index]