detrendr
expects the time dimension to be the fourth
dimension of the image (y
, x
,
channel
, time
). Some people’s data is
linescan, meaning there is only one spatial dimension (x
)
and time is placed along the y
axis of the image. We have
an example in this package. It’s 1,000 time points of a line of 64
pixels; it has 2 channels.
<- ijtiff::read_tif(system.file("extdata", "linescan.tif",
linescan_img package = "detrendr"))
#> Reading linescan.tif: an 8-bit, 1000x64 pixel image of
#> unsigned integer type. Reading 2 channels and 1 frame . . .
#> Done.
dim(linescan_img)
#> [1] 1000 64 2 1
As you can see, the image has 1,000 rows and 64 columns in its two
channels, so time is indeed along the y
axis. This won’t
work with detrendr, so before detrending it, we need to put time on the
fourth dimension. Fortunately, ijtiff
provides a function
for this.
<- ijtiff::linescan_to_stack(linescan_img)
converted_img dim(converted_img)
#> [1] 1 64 2 1000
Now as you can see, time is on the fourth dimension, so we can proceed as normal.
library(detrendr)
<- img_detrend_rh(converted_img)
detrended_converted_img dim(detrended_converted_img)
#> [1] 1 64 2 1000
This image is still in stack format. You could now convert it back to linescan format if you like.
<- ijtiff::stack_to_linescan(detrended_converted_img)
linescan_detrended_img dim(linescan_detrended_img)
#> [1] 1000 64 2 1
You can then do as you please with these results, such as save them
with ijtiff::write_tif()
.