2013-09-19 3 views
0

У меня есть следующий кадр данныхПреобразование непрерывной схемы месяца на сегодняшний день

DateBA<-structure(list(PUBID = c(1, 8, 9, 10, 28, 31, 32, 33, 34, 35), 
    CVC_BA_DEGREE = c(281, 282, 305, 293, 317, 293, 281, 282, 
    329, 321)), datalabel = "", time.stamp = "19 Sep 2013 14:32", .Names = c("PUBID", 
"CVC_BA_DEGREE"), formats = c("%9.0g", "%9.0g"), types = c(254L, 
254L), val.labels = c("vlR0000100", ""), var.labels = c("PUBID - YTH ID CODE 1997", 
"CVC_BA_DEGREE"), version = 12L, label.table = structure(list(
    vlR0000100 = structure(0L, .Names = "0")), .Names = "vlR0000100"), row.names = c(NA, 
10L), class = "data.frame") 

Я хочу, чтобы преобразовать DateBA $ CVC_BA_DEGREE в более работоспособный формат (месяц-год)

Я знаю, что январь 1980 == 1; Февраль 1980 == 2; Декабрь 1998 г. == 228

Спасибо за помощь!

ответ

3

Попробуйте yearmon в zoo пакета. Из ?yearmon: «„класс yearmon“используется для представления ежемесячных данных Внутренне она содержит данные, как год плюс 0 за январь, 1/12 за февраль, 2/12 за март и так далее

library(zoo) 
yearmon <- as.yearmon(1980 + seq(0, 227)/12) 

. редактировать следующий комментарий @ EDDI в
я был небрежен, когда я прочитал этот вопрос и дал ответ на ... что-то еще ... Извините!

Вот правильный ответ @ EDDI в (спасибо!)

as.yearmon(1980 + DateBA$CVC_BA_DEGREE/12) 
+3

Я думаю, что OP wa nts 'as.yearmon (1980 + DateBA $ CVC_BA_DEGREE/12)' – eddi

+0

@eddi Конечно! Я неправильно понял вопрос. Можете ли вы опубликовать его в качестве ответа, и я удалю свою. Спасибо, что заметили мою ошибку! – Henrik

+0

nah, просто отредактируйте его в :) – eddi

Смежные вопросы