accessing
messages
messages ifNil: [ ^ messages := TweetsCollection new ].
^ messages select: [ :message | message created between: self reportingPeriod start and: self reportingPeriod end ]