accessing
tweets
	self messages ifNil: [ ^ nil ].
	^ TweetsCollection new
		messages: (self messages messages select: [ :each | each authorId = self id ]);
		yourself