Как избавиться от десятичных цифр на оси х

Question

Я хочу создать простой график.

year=c(2005,2006,2007)
dat=c(1,2,3)
plot(year,dat)

Как показать ось только как год без десятичных цифр?Спасибо

Answer 1

Укажите year в качестве даты, используя as.Date. Вот один из способов, используя seq.Date:

year=seq(as.Date("2005/01/01"), by="1 year", length.out=3)
dat=c(1,2,3)
plot(year,dat)

Answer 2

3 возможных способа:

• Управление разрешением этикетки с помощью xaxp:

  plot(year,dat,xaxp=c(range(year),2))

• ИспользованиеDate объект для оси x:

  year2 <- as.Date(paste(year,"-01-01",sep=""))

  plot(year2,dat)

• Построить ось самостоятельно:

  plot(year,dat,xaxt="n")

  axis(1,at=year)