ใครเขียนภาษา R เป็นช่วยแนะนำหน่อยค่ะ

กระทู้คำถาม
i=1
dna="AAATCGC"
strsplit(dna,"")[[1]]
while(i<=length(dna1)){
  if(dna1=="A")print("T");
  if(dna1=="T")print("A");
  if(dna1=="C")print("G");
  if(dna1=="G")print("C");
  i=i+1}

คือพอrunออกมาแล้วมันได้คำตอบเป็น
[1] "T"
[1] "T"
[1] "T"
[1] "A"
[1] "G"
[1] "C"
[1] "G"

แต่ผลลัพธ์ที่อยากได้อยากให้มันแสดงออกมาเป็นบรรทัดเดียว "TTTAGCG" แบบนี้ค่ะ ขอคำแนะนำว่าควรจะต้องแก้ code ด้านบนเป็นอะไรคะ  
ใครรู้รบกวนแนะนำหน่อยค่ะ ขอบคุณค่ะ
แสดงความคิดเห็น
โปรดศึกษาและยอมรับนโยบายข้อมูลส่วนบุคคลก่อนเริ่มใช้งาน อ่านเพิ่มเติมได้ที่นี่