占星家
这是一个 R 库,旨在提供一些有用的例程来显示射电望远镜图像。 该库旨在主要为一些简单的缩放例程提供一些简单的接口。
该库使用来自代码来进行梯度域高动态范围压缩。
##示例用法
library(FITSio)
library(astror)
library(png)
fits <- readFits("a.fits")
imageData = fits$imDat
plot.new()
rasterImage(slog(imageData),useRaster=T)
ll = logLuminance(imageData[,,1])
cl = gradientDomainHDRCompression(ll)
gm = luminanceToGray(cl)
writePNG(gm, "test.png")
ll = extractLuminance(imageData[,,1
2023-02-19 11:22:20
37KB
C++
1