How to set minor axis ticks using ylim in the barchart function (lattice R package)

Question

Would anyone have any insight on using the ylim option in the barchart function? What I am attempting to do should be simple but I am having trouble with setting the minor tick marks. I am plotting a continuous integer that ranges from 1:9 and I'd like for each value (1,2,3,4,5,6,7,8,9) to be displayed on the graph.

Here is some example code...

ratings <- c(4, 4.1, 4, 4.6, 3.8, 4.3)
group <- c("X", "Y", "C", "Y", "X", "Y")
cond <- c("C", "C", "L", "L", "S", "S")

meandata <- data.frame(ratings, group, cond)

attach(meandata)

group <- as.factor(group)
cond <- as.factor(cond)


bar=barchart(ratings~cond, groups = group, 
auto.key = TRUE, par.settings = my.settings,
xlab = "Condition",
ylab = "Attraction Ratings",
main = "Attraction Ratings as a function of Condition and Group",
ylim = c(1:9)
yscale.components=
)

bar

Answer 1

You can use the scales argument in barchart for this.

library(lattice)
barchart(ratings ~ cond, groups = group, ylim = 1:9,
         auto.key = TRUE, xlab = "Condition", 
         ylab = "Attraction Ratings",
         main = "Attraction Ratings as a function of Condition and Group",
         scales = list(y = list(at = c(1:9))))

Answer 2

After taking a second look I think I might know you meant about using ylim.

group <- as.factor(group)
cond <- as.factor(cond)
bar=barchart(ratings~cond, groups = group, 
auto.key = TRUE,
xlab = "Condition",
ylab = "Attraction Ratings",
main = "Attraction Ratings as a function of Condition and Group",
ylim = c(1:9), 
scales=list(y=list(at=1:9, labels=1:9))
)
png("out.png")
print(bar); dev.off()

BTW: I it's generally a bad idea to use barcharts with non-zero values for the lower limit. It's a common way of "lying with statsitics" since it exaggerates differences.

I left my earlier guess in using the latticeExtra function yscale.components.subticks:

library(latticeExtra)
bar=barchart(ratings~cond, groups = group, 
auto.key = TRUE,
xlab = "Condition",
ylab = "Attraction Ratings",
main = "Attraction Ratings as a function of Condition and Group",
ylim = c(1:9), tck=c(5,1),
yscale.components=yscale.components.subticks
)

bar