расчет возраста на основе любого предыдущего времени

Question

Есть ли способ найти решение проблемы, подобной этой;

, если мой возраст 10 января 2010 года составлял 2 года, сколько будет возраст 10 апреля апреля 2012 года.

С уважением

Answer 1

Вы можете установить даты, например:

x <- as.Date("2010-01-10")
y <- as.Date("2012-04-10")

>y-x
Time difference of 821 days

Отсюда просто добавьте это к 2 годам.Дайте мне знать, если это поможет!

Answer 2

Просто используйте difftime(), чтобы вычислить разницу, а затем добавьте возраст.Примерно так:

earlier_age <- 2
diff <- as.numeric(difftime(latest_date, earlier_date), units="years") 
#make sure that dates are actually date objects (using as.Date())
new_age <- diff + earlier_age


#So for your example:
latest_date <- as.Date("10/April/2012", format = "%d/%B/%Y")
earlier_date <- as.Date("10/jan/2010", format = "%d/%b/%Y")
earlier_age <- 2

diff <- as.numeric(difftime(latest_date, earlier_date), units="days")/365.25
new_age <- diff + earlier_age

Вы можете изменить единицы измерения на недели, часы и т. Д. Согласно вашему требованию