From 6185120fc3c78ca4bae4efb7e83f0dfcbc2cf267 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Tam=C3=A1s=20Ferenci?= <tamas.ferenci@medstat.hu>
Date: Sat, 11 Nov 2017 13:39:59 +0100
Subject: [PATCH] Unnecessary (duplicated) rows are now removed.

---
 IrszHnk.R | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/IrszHnk.R b/IrszHnk.R
index d0c60e3..1f3a258 100644
--- a/IrszHnk.R
+++ b/IrszHnk.R
@@ -37,4 +37,6 @@ names( Irsz )[ 2 ] <- names( Hnk )[ 1 ]
 
 IrszHnk <- merge( Irsz, Hnk )
 
+IrszHnk <- IrszHnk[ !duplicated( IrszHnk ), ]
+
 write.csv2( IrszHnk, "IrszHnk.csv", row.names = FALSE )