{"action":"closed","issue":{"url":"https://api.github.com/repos/alexkowa/sdcMicro/issues/64","labels_url":"https://api.github.com/repos/alexkowa/sdcMicro/issues/64/labels{/name}","comments_url":"https://api.github.com/repos/alexkowa/sdcMicro/issues/64/comments","events_url":"https://api.github.com/repos/alexkowa/sdcMicro/issues/64/events","html_url":"https://github.com/alexkowa/sdcMicro/issues/64","id":107472019,"number":64,"title":"localsuppression idvarextraforsls with testdata2","user":{"login":"thijsbenschop","id":8253935,"avatar_url":"https://avatars.githubusercontent.com/u/8253935?v=3","gravatar_id":"","url":"https://api.github.com/users/thijsbenschop","html_url":"https://github.com/thijsbenschop","followers_url":"https://api.github.com/users/thijsbenschop/followers","following_url":"https://api.github.com/users/thijsbenschop/following{/other_user}","gists_url":"https://api.github.com/users/thijsbenschop/gists{/gist_id}","starred_url":"https://api.github.com/users/thijsbenschop/starred{/owner}{/repo}","subscriptions_url":"https://api.github.com/users/thijsbenschop/subscriptions","organizations_url":"https://api.github.com/users/thijsbenschop/orgs","repos_url":"https://api.github.com/users/thijsbenschop/repos","events_url":"https://api.github.com/users/thijsbenschop/events{/privacy}","received_events_url":"https://api.github.com/users/thijsbenschop/received_events","type":"User","site_admin":false},"labels":[],"state":"closed","locked":false,"assignee":null,"milestone":null,"comments":3,"created_at":"2015-09-21T09:09:55Z","updated_at":"2015-09-21T10:41:33Z","closed_at":"2015-09-21T10:41:33Z","body":"Hi,\r\n\r\nthe function localsuppression creates under some circumstances a variable called idvarextraforsls and adds this to the list of key variables. This variable enumerates all records and renders them sample uniques (100% 2-anonimity violators). This also happens when using the example in the help file of the localsuppression function:\r\n\r\n```\r\ndata(testdata2)\r\nsdc <- createSdcObj(testdata2,\r\nkeyVars=c('urbrur','roof','walls','water','electcon','relat','sex'),\r\nnumVars=c('expend','income','savings'), w='sampling_weight')\r\n\r\nsdc <- localSuppression(sdc)\r\nhead(sdc@manipKeyVars)\r\n\r\n  urbrur roof walls water electcon relat sex idvarextraforsls\r\n1      1    2     3    NA        4     1   1                1\r\n2      1    2     3     3        4    NA   1                2\r\n3      1    2     3     3        4     1  NA                3\r\n4      1   NA     3     4        1     3   1                4\r\n5      1    2     3    NA        4    NA   2                5\r\n6      1    4     2    NA        1     3   1                6\r\n\r\nprint(sdc, 'ls')\r\n\r\nurbrur ............ 3 [ 3.226 %]\r\n\r\nroof .............. 10 [ 10.753 %]\r\n\r\nwalls ............. 7 [ 7.527 %]\r\n\r\nwater ............. 26 [ 27.957 %]\r\n\r\nelectcon .......... 0 [ 0 %]\r\n\r\nrelat ............. 14 [ 15.054 %]\r\n\r\nsex ............... 4 [ 4.301 %]\r\n\r\nidvarextraforsls .. NA [ NA %]\r\n```"}}