Hi,

Given a month name, I am looking for some script to figure out, what is the
date for 3rd Wednesday. For example let say I have following month:

library(zoo)
Month <- as.yearmon(as.Date(Sys.time()))

I need to answer: What is the date for 3rd Wednesday of 'Month'?

Really appreciate for any pointer.

Thanks for your time.

	[[alternative HTML version deleted]]


