IT4664 without Compilation

Visual Code(data=example):

Visual Code(data=input box):

then to see the Example

Source,Target,WCD Canada,Canada,2 U.K,U.K,4 China,China,54 Singapore,Singapore,1 South_Korea,South_Korea,8 U.S,U.S,5 Grenada,Grenada,1 Ireland,Ireland,1 France,France,1 China,U.S,1.5 China,Hong_Kong,1.5 Italy,Italy,1 Spain,Spain,2 Australia,Australia,1 India,India,1 Hong_Kong,Hong_Kong,1 Germany,Germany,1 Australia,China,0.5 Iran,Iran,1

for Authorcorrence6

The number of Clusers is set at (2,targe, value) = 2, for example
Copy & Paste the Code in R to Rstudio

model,China,South_Korea,U.S,U.K,Canada,Spain,Hong_Kong,Australia,France,Singapore,Italy,Grenada,Ireland,India,Germany,Iran China,1,0,1.5,0,0,0,1.5,0.5,0,0,0,0,0,0,0,0 South_Korea,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 U.S,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 U.K,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Canada,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Spain,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Hong_Kong,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Australia,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 France,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Singapore,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Italy,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Grenada,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Ireland,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 India,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Germany,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Iran,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0