ロゴというものを作ってみたが大丈夫か?

美的センスとか絵心とかそういうものにまったく心得がないオレがなんか作ってみるぞ。
とりあえずドット絵だ。

A<- matrix(0,40,20)
B<- A
B[1,]<-1
B[2,c(16:18)]<-1
B[3,c(13:15)]<- 1
B[4,c(10:12)]<- 1
B[5,c(7:9)]<- 1
B[6,c(4:6)]<- 1
B[7,c(1:3)]<- 1
B[8,c(4:6)]<- 1
B[9,c(7:9)]<- 1
B[10,c(10:12)]<- 1
B[11,c(13:15)]<- 1
B[12,c(16:18)]<- 1
B[13,]<- 1
B[14,]<- 0
B[15,c(1,20)]<- 1
B[16,]<- 1
B[17,c(1,20)]<- 1
B[18,]<- 0
B[19,]<- 1
B[20,c(10:12)]<- 1
B[21,c(9:10,12:13)]<- 1
B[22,c(8:9,13:14)]<- 1
B[23,c(7:8,14:15)]<- 1
B[24,c(5:6,15:16)]<- 1
B[25,c(4:5,16:17)]<- 1
B[26,c(3:4,17:18)]<- 1
B[27,c(2:3,18:19)]<- 1
B[28,c(1:2,19:20)]<- 1
B[29,]<- 0
B[30,c(3:20)]<- 1
B[31,2]<- 1
B[32,1]<- 1
B[33,1]<- 1
B[34,1]<- 1
B[35,1]<- 1
B[36,1]<- 1
B[37,1]<- 1
B[38,1]<- 1
B[39,2]<- 1
B[40,c(3:20)]<- 1
C<- diag(0,50)
C[c(6:45),c(16:35)]<- B
image(C)

ドット絵というか単なる文字だが、大丈夫か?