Displaying 1 result from an estimated 1 matches for "fixlin".
Did you mean:
fillin
2010 Mar 06
0
thin grid lines, again (FAQ 7.36), a proposal
...in)appropriately:
pdf("TestBand.pdf")
n <- 16
x <- y <- seq(1, n)
z <- matrix(1, n, n)
z[, 7:10] <- 0.5
z[, c(5, 12)] <- 0
cc <- seq(0, 1, len = 256)
image(z, col = grey(cc), axes = FALSE)
dev.off()
and afterwards I corrected the file with the following awk filter
#FixLines.awk
{
if ($NF == "rg") {
print $0
for (i = 1; i < NF; i++) printf "%6.3f ", $i
print " RG"
}
else {if ($NF == "f") {
for (i = 1; i < (NF - 1); i++) printf "%6.3f ", $i
print "re b&q...