大きなジオテフファイル(4つのRGBAバンド)を小さなタイルに切り取りたい。ラスターファイルを読むにはラスターパッケージのbrick
を使用し、ディスクに書き込むにはwriteRaster
を使用します。ただし、イメージビューアで新しいファイルを開くことはできません。 ColorInterpタグがないために発生します。 Iイメージビューアで見ることができるジオテフにラスターレンガを保存する
a <- brick(old.tif)
writeRaster(a, filename = new.tif)
はold.tifとnew.tifにTIFFタグを比較してください。 BitsPerSampleというタグは、old.tifの場合は8、new.tifの場合は64です。そこで私は0-255
となっていたINT1U
にラスタのdataTypeを更新しました。
dataType(a) <- 'INT1U'
writeRaster(a, filename = new.tif, dataType = 'INT1U')
しかし、タグは、bitsPerSampleはまだ64 に等しい私の現在の問題は、どのように私は8
PSには、bitsPerSampleを指定する必要がある:このコードは、あまりにも
writeRaster(a, filename = new.tif, dataType = 'INT1U', BitsPerSample = 8)
が動作していませんPPS:writeTIFF
は、crs情報なしで表示可能なTIFFファイルを生成することができます。
古いファイルと新しいファイルのtiffタグを比較します。新しいファイルには、BitsPerSample(4 Short):64,64,64,64(8である必要があります)があります。 – Bangyou
特に、データ型が8ビット符号なしよりも高い場合は、マルチバンドTIFFが正しく解釈されません。あなたは何を使っていますか? QGisなどで開いてみてください。 – Benjamin
QGisやその他のソフトウェアで画像を見ることができると私は理解しています。しかし、私の元のtifファイルはRGBAであり、どの画像ビューアでも見ることができます。同じ8ビットの新しい画像を作成したいだけです。 – Bangyou