I have a weekly data set imported via:

tsSource=ts(sh1$I000,start=c(2004,1),freq=52)
I am now getting to some 'spit and polish' but I realize something I can't
wrap my head around.

Given an outlier I find at say tsSource[54] ... how can get translate index
54 into the date\week. I mean I can figure out obviously that entry 52 is
last week of 2004 but since the data goes for many years week 251 is a tad
bit tricky since there are some years with 53 weeks in a year. Is there a
function that I am missing to give me a date (or even julian week #) from a
time series object? Since I am generating graphs that should read "Week
starting xxx/xxx/xxx" I was hoping there was a systematic way to retrive the
date from the time series object. Any suggestions?

	[[alternative HTML version deleted]]

