accessing
tweets
	| subcollection |
	self messages ifEmpty: [ self getMessages ].
	"TO DO: It seems that Twitter changes the user id, which we thought was unchangeable. This deals with the detected changes so far."
	
	subcollection := self messages 
				select: [ :each | self authorIds includes: each authorId ].

	(#('FranciaMarquezM' 'sandralajas' 'IBetancourtCol' 'sergio_fajardo' 'ingrodolfohdez' 'CastilloMarelen') includes: self userName)
		ifFalse: [ subcollection := self messages select: [ :each | each authorId = self id ]].
	^ TweetsCollection new
		messages: subcollection;
		yourself