number <- c("one", "two", "three", "four", "five", "six", "seven", "eight", "nine", "ten");

for(i in 1:10) {
	cat( number[i], "little ");

	if( i %% 3 == 0) {
		cat("indians\n");
	}

	if(i == 10) {
		cat("indian boys\n");
	}
}