Help!!!I have a problem in using readHTMLTable()

Question: I use readHTMLTable() in package(XML) to grab a form in a website(""). But the form is special and looks like the writer merges some cells. So when I grab it, the result is wierd as you can see in the pitcure. So What shoud I do? I heard that there are a lot of masters in the community. So I come here. Thanks a lot!!!!
Here is my code:

temp<-getURL(url,httpheader = myHttpheader,.encoding = "GB2312")
doc<-htmlParse(temp1,asText = TRUE,encoding = "UTF-8")
table1<-readHTMLTable(doc,header = TRUE,which = 1)

what package is getURL from, and what is the content of myHttpheader ?

Sorry, getURL is from package ‘RCurl’ , and
myHttpheader <- c(
"User-Agent"="Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/31.0.1650.48 Safari/537.36 QQBrowser/7.7.31732.400",
"Accept-Language"="en-us", "Connection"="keep-alive",

Help!!!!! It has been a big problem for me.

Its hard when I don't speak the language... I made a simple example to show XML might not give desired behavioir compared to rvest. maybe there are even other packages that would be better

# htmltablewithmerge.html #

# <body>
#   <table style="border: 1px solid black;">
#     <tr ><th>head1</th><th>head2</th><th>head3</th></tr>
#     <tr ><td colspan="2">merged text 1 & 2 ?</td><td>text3</td></tr>
#       </table>
#       </body>

(table1<-readHTMLTable("htmltablewithmerge.html",which = 1))


  html_node("table") %>%

Really thank you!!! I tried your methods and the result went well! I am a student and sometimes really desperate for looking for help. Thanks again!!!

