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