bitmap .tif in colors

Hello,

How to produce .tif graphic in colors using bitmap function?

e.g this produces figure in grayscale

bitmap(file="volc.tif", type = "tifflzw", res = 300)
image(t(volcano)[ncol(volcano):1,])
dev.off()

I'm using Windows XP and ghostscript.

R.Version()

$platform
[1] "i386-pc-mingw32"

$arch
[1] "i386"

$os
[1] "mingw32"

$system
[1] "i386, mingw32"

$status
[1] ""

$major
[1] "2"

$minor
[1] "7.1"

$year
[1] "2008"

$month
[1] "06"

$day
[1] "23"

$`svn rev`
[1] "45970"

$language
[1] "R"

$version.string
[1] "R version 2.7.1 (2008-06-23)"