let R sing the beatles

let it be.R

title = "Let it be"

wow = "words of wisdom"

Verse.1 = 
	c(	"When I find myself in times of trouble" ,
		"Mother Mary comes to me" ,
		paste( "Speaking" , wow ) ,
		title )
	
Verse.2 = 
	c(	"And in my hour of darkness" ,
		"She is standing right in front of me" ,
		paste( "Speaking" , wow ) ,
		title )

for ( i in 1:2 )
	for ( j in get( 
		paste( "Verse." , i , sep = "" ) ) )
			print( j )

for ( i in 1:6 ) 
	print( 
		ifelse( i %in% 5 , 
			paste( "Whisper" , wow ) , 
			title ) )