{"id":269089,"date":"2015-11-26T15:52:02","date_gmt":"2015-11-26T12:52:02","guid":{"rendered":"http:\/\/savepearlharbor.com\/?p=269089"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-29T21:00:00","slug":"","status":"publish","type":"post","link":"https:\/\/savepearlharbor.com\/?p=269089","title":{"rendered":"\u041d\u0430\u0439\u0434\u0438 \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u043e\u043d\u0435\u0440\u0430. \u0410\u043d\u0430\u043b\u0438\u0437 \u0434\u0430\u043d\u043d\u044b\u0445 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0438\u0437 \u043f\u0440\u043e\u0435\u043a\u0442\u043e\u0432 \u041a\u0430\u043d\u0446\u0435\u043b\u044f\u0440\u0441\u043a\u043e\u0439 \u0441\u043e\u0442\u043d\u0438 (\u0441 \u043f\u0440\u0438\u043c\u0435\u0440\u0430\u043c\u0438 \u043d\u0430 R)"},"content":{"rendered":"<p>       \u041a\u0430\u043a \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432, \u043d\u0430\u0438\u0431\u043e\u043b\u0435\u0435 \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0441 \u0442\u043e\u0447\u043a\u0438 \u0437\u0440\u0435\u043d\u0438\u044f \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u0438? \u041f\u0440\u043e\u0449\u0435 \u0432\u0441\u0435\u0433\u043e \u2014 \u0441\u0440\u0430\u0432\u043d\u0438\u0432 \u0438\u0445 \u0434\u043e\u0445\u043e\u0434\u044b \u0438 \u0443\u0440\u043e\u0432\u0435\u043d\u044c \u0436\u0438\u0437\u043d\u0438. <\/p>\n<p>  \u0412 \u044d\u0442\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435 \u044f \u0445\u043e\u0447\u0443 \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u0438 \u0441\u0430\u0439\u0442\u043e\u0432 \u0441 \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0439 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0435\u0439 \u043e \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0430\u0445, \u043f\u043e\u0441\u043c\u043e\u0442\u0440\u0435\u0442\u044c \u043d\u0430 \u0442\u043e, \u043a\u0430\u043a \u044d\u0442\u0438 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0438 \u0436\u0438\u0432\u0443\u0442 \u0438 \u043f\u043e\u043f\u044b\u0442\u0430\u0442\u044c\u0441\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u0442\u0435\u0445, \u043a\u0442\u043e \u043d\u0430\u0438\u0431\u043e\u043b\u0435\u0435 \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u0435\u043d \u0441 \u0442\u043e\u0447\u043a\u0438 \u0437\u0440\u0435\u043d\u0438\u044f \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u0438. <\/p>\n<p>  \u041f\u043e\u0447\u0435\u043c\u0443 \u043e\u0442\u043a\u0440\u044b\u0442\u0430\u044f \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u044f \u043e \u0434\u043e\u0445\u043e\u0434\u0430\u0445 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0432\u0430\u0436\u043d\u0430? \u041f\u043e\u0442\u043e\u043c\u0443 \u0447\u0442\u043e \u044d\u0442\u043e \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0438\u0445 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u0438\u0440\u043e\u0432\u0430\u0442\u044c. <\/p>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/b21\/866\/e75\/b21866e7543349f9a672d1aa2c3a8270.PNG\" alt=\"image\"\/><br \/>  <i>\u0424\u043e\u0442\u043e \u0438\u0437 \u0438\u043d\u0441\u0442\u0430\u0433\u0440\u0430\u043c\u043c\u0430 \u0434\u043e\u0447\u0435\u0440\u0438 \u0431\u044b\u0432\u0448\u0435\u0433\u043e \u0440\u0443\u043a\u043e\u0432\u043e\u0434\u0438\u0442\u0435\u043b\u044f \u0413\u0410\u0418 \u0423\u043a\u0440\u0430\u0438\u043d\u044b \u0410\u043b\u0435\u043a\u0441\u0430\u043d\u0434\u0440\u0430 \u0415\u0440\u0448\u043e\u0432\u0430. \u041d\u0430 \u0444\u043e\u0442\u043e \u0434\u043e\u0447\u044c \u0415\u0440\u0448\u043e\u0432\u0430 \u0432 \u041a\u0430\u043d\u043d\u0430\u0445 \u0440\u044f\u0434\u043e\u043c \u0441 \u041f\u044d\u0440\u0438\u0441 \u0425\u0438\u043b\u0442\u043e\u043d. \u0412 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u0435 \u0441\u043a\u0430\u043d\u0434\u0430\u043b\u0430 \u0438\u0437-\u0437\u0430 \u043d\u0435\u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0438\u044f \u0437\u0430\u0434\u0435\u043a\u043b\u0430\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0445 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0438 \u043e\u0431\u0440\u0430\u0437\u0430 \u0436\u0438\u0437\u043d\u0438 \u0441\u0435\u043c\u044c\u0438 <a href=\"http:\/\/www.radiosvoboda.org\/content\/article\/27025593.html\">\u0415\u0440\u0448\u043e\u0432 \u043f\u043e\u0434\u0430\u043b \u0432 \u043e\u0442\u0441\u0442\u0430\u0432\u043a\u0443<\/a>.<\/i><br \/>  <a name=\"habracut\"><\/a>  <\/p>\n<h4>\u041e\u0442\u043a\u0443\u0434\u0430 \u0434\u0430\u043d\u043d\u044b\u0435?<\/h4>\n<p>  \u0414\u0430\u043d\u043d\u044b\u0435 \u043f\u043e \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u044f\u043c \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0432\u0437\u044f\u0442\u044b \u0441 \u0441\u0430\u0439\u0442\u0430 declarations.com.ua, \u0430 \u043e \u0432\u043b\u0430\u0434\u0435\u043b\u044c\u0446\u0430\u0445 \u044d\u043b\u0438\u0442\u043d\u043e\u0439 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u2014 \u0441 \u0441\u0430\u0439\u0442\u0430 garnahata.in.ua. \u041e\u0431\u0430 \u0441\u0430\u0439\u0442\u0430 \u2014 \u043f\u0440\u043e\u0435\u043a\u0442\u044b \u0441\u043e\u043e\u0431\u0449\u0435\u0441\u0442\u0432\u0430 \u0436\u0443\u0440\u043d\u0430\u043b\u0438\u0441\u0442\u043e\u0432 \u0438 \u0432\u043e\u043b\u043e\u043d\u0442\u0435\u0440\u043e\u0432 \u00ab\u041a\u0430\u043d\u0446\u0435\u043b\u044f\u0440\u0441\u043a\u0430\u044f \u0441\u043e\u0442\u043d\u044f\u00bb, \u0438\u0437\u043d\u0430\u0447\u0430\u043b\u044c\u043d\u043e \u043e\u0440\u0433\u0430\u043d\u0438\u0437\u043e\u0432\u0430\u043d\u043d\u043e\u0433\u043e \u0434\u043b\u044f \u043e\u0446\u0438\u0444\u0440\u043e\u0432\u043a\u0438 \u0434\u043e\u043a\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0438\u0437 \u0434\u043e\u043c\u0430 \u042f\u043d\u0443\u043a\u043e\u0432\u0438\u0447\u0430.<\/p>\n<p>  \u041d\u0430 \u0434\u0430\u043d\u043d\u044b\u0439 \u043c\u043e\u043c\u0435\u043d\u0442 \u043d\u0430 \u0441\u0430\u0439\u0442\u0430\u0445 \u0434\u043e\u0441\u0442\u0443\u043f\u043d\u043e \u043e\u043a\u043e\u043b\u043e 11 \u0442\u044b\u0441\u044f\u0447 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0438\u0437 \u0440\u0430\u0437\u043d\u044b\u0445 \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432 \u0438 \u043e\u043a\u043e\u043b\u043e 9 \u0442\u044b\u0441\u044f\u0447 \u0437\u0430\u043f\u0438\u0441\u0435\u0439 \u043e \u0432\u043b\u0430\u0434\u0435\u043b\u044c\u0446\u0430\u0445 \u044d\u043b\u0438\u0442\u043d\u043e\u0439 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438. \u0421\u0440\u0435\u0434\u0438 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u043e\u0432 \u0432 \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u043c \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u0438\u0442\u0435\u043b\u0438 \u0440\u0430\u0437\u043d\u044b\u0445 \u043c\u0438\u043d\u0438\u0441\u0442\u0435\u0440\u0441\u0442\u0432 (\u0432\u043a\u043b\u044e\u0447\u0430\u044f \u0441\u043b\u0443\u0436\u0431\u044b \u043d\u0430 \u043c\u0435\u0441\u0442\u0430\u0445), \u0440\u0430\u0431\u043e\u0442\u043d\u0438\u043a\u0438 \u0441\u0443\u0434\u043e\u0432 \u0438 \u043f\u0440\u043e\u043a\u0443\u0440\u0430\u0442\u0443\u0440\u044b. \u0414\u0430\u043d\u043d\u044b\u0435 \u043d\u0435 \u043f\u0440\u0435\u0442\u0435\u043d\u0434\u0443\u044e\u0442 \u043d\u0430 \u0440\u0435\u043f\u0440\u0435\u0437\u0435\u043d\u0442\u0430\u0442\u0438\u0432\u043d\u043e\u0441\u0442\u044c (\u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0432 \u0423\u043a\u0440\u0430\u0438\u043d\u0435 <a href=\"http:\/\/www.center.gov.ua\/attachments\/article\/26\/CSF_2015_UKR.pdf\">\u043e\u043a\u043e\u043b\u043e 400 \u0442\u044b\u0441\u044f\u0447<\/a>), \u043d\u043e \u043f\u043e\u043a\u043e\u043f\u0430\u0442\u044c\u0441\u044f \u0432 \u043d\u0438\u0445 \u0432\u0441\u0435 \u0440\u0430\u0432\u043d\u043e \u0438\u043d\u0442\u0435\u0440\u0435\u0441\u043d\u043e. <\/p>\n<p>  \u0423 \u043e\u0431\u043e\u0438\u0445 \u0441\u0430\u0439\u0442\u043e\u0432 \u0435\u0441\u0442\u044c \u043e\u0442\u043a\u0440\u044b\u0442\u044b\u0439 API, \u0434\u0430\u043d\u043d\u044b\u0435 \u0432 \u0444\u043e\u0440\u043c\u0430\u0442\u0435 JSON \u043c\u043e\u0436\u043d\u043e \u0441\u043a\u0430\u0447\u0430\u0442\u044c \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e <a href=\"http:\/\/declarations.com.ua\/api\/\">\u0441\u043a\u0440\u0438\u043f\u0442\u0430 \u043d\u0430 python<\/a>. \u0421\u0445\u0435\u043c\u0430 \u043e\u0431\u044a\u0435\u043a\u0442\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u0434\u043b\u044f \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439 \u0435\u0441\u0442\u044c \u043d\u0430 github <a href=\"https:\/\/github.com\/dchaplinsky\/declarations.com.ua\/blob\/master\/declarations_site\/catalog\/data\/mapping_defs.json\">\u0442\u0443\u0442<\/a>, \u0430 \u0441\u0445\u0435\u043c\u0443 \u043e\u0431\u044a\u0435\u043a\u0442\u0430 \u0434\u043b\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u043e \u0432\u043b\u0430\u0434\u0435\u043b\u044c\u0446\u0430\u0445 \u044d\u043b\u0438\u0442\u043d\u043e\u0439 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u2014 <a href=\"https:\/\/github.com\/dchaplinsky\/garnahata.in.ua\/blob\/master\/garnahata_site\/catalog\/models.py#L79\">\u0442\u0443\u0442<\/a>. \u0414\u043b\u044f \u043f\u0440\u0438\u043c\u0435\u0440\u0430 \u0438 \u043f\u043e\u043d\u0438\u043c\u0430\u043d\u0438\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0434\u0430\u043d\u043d\u044b\u0445 \u2014 <a href=\"http:\/\/unshred.it\/static\/declarations\/kmu2014\/15821709.pdf\">\u0441\u043a\u0430\u043d-\u043a\u043e\u043f\u0438\u044f \u043e\u0434\u043d\u043e\u0439 \u0438\u0437 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439 \u0441\u0430\u0439\u0442\u0430<\/a>. <\/p>\n<p>  \u0417\u0430\u0433\u0440\u0443\u0437\u0438\u0432 \u0434\u0430\u043d\u043d\u044b\u0435, \u044f \u0440\u0430\u0441\u043f\u0430\u0440\u0441\u0438\u043b\u0430 \u0438\u0445 \u0432 R, \u0430\u0433\u0440\u0435\u0433\u0438\u0440\u043e\u0432\u0430\u043b\u0430 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0438 \u043e\u0441\u0442\u0430\u0432\u0438\u043b\u0430 \u0442\u043e\u043b\u044c\u043a\u043e \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0438 \u0437\u0430 2013 \u0438 2014 \u0433\u043e\u0434\u044b. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041f\u0440\u0438\u043c\u0435\u0440 \u043a\u043e\u0434\u0430 \u0434\u043b\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u0438\u0437 JSON \u0444\u0430\u0439\u043b\u0430<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0417\u0430\u0433\u0440\u0443\u0436\u0430\u0435\u043c \u0432 R \u0434\u0430\u043d\u043d\u044b\u0435 \u0438\u0437 \u0444\u0430\u0439\u043b\u0430 JSON \u2014 \u043f\u043e\u043b\u0443\u0447\u0430\u0435\u043c \u043e\u0431\u044a\u0435\u043a\u0442 \u0442\u0438\u043f\u0430 list decl_raw&lt;-rjson::fromJSON(file=&quot;feed.json&quot;)   #\u0421\u043e\u0437\u0434\u0430\u0435\u043c dataframe \u0441 \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u043e\u043c \u0441\u0442\u0440\u043e\u043a, \u0440\u0430\u0432\u043d\u044b\u043c \u043a\u043e\u043b-\u0432\u0443 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439 decl_df&lt;-data.frame(matrix(NA,nrow=length(decl_raw), ncol = 0))  # #\u041f\u0440\u043e\u0441\u0442\u043e\u0439 \u0441\u043b\u0443\u0447\u0430\u0439: \u0434\u043e\u043b\u0436\u043d\u043e\u0441\u0442\u044c \u0438 \u043c\u0435\u0441\u0442\u043e \u0440\u0430\u0431\u043e\u0442\u044b \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 #  #\u0414\u043e\u0431\u0430\u0432\u043b\u044f\u0435\u043c \u043a\u043e\u043b\u043e\u043d\u043a\u0438   decl_df$general.post.region&lt;-\u201c\u201d   decl_df$general.post.office&lt;-\u201c\u201d   decl_df$general.post.post&lt;-\u201c\u201d  #\u0421\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u043c \u0434\u0430\u043d\u043d\u044b\u0435 \u0438\u0437 \u0441\u043f\u0438\u0441\u043a\u0430  for (i in 1:length(decl_raw)) {   #   #\u0414\u0410\u041d\u041d\u042b\u0415 \u041e \u0414\u041e\u041b\u0416\u041d\u041e\u0421\u0422\u0418   #     #\u0420\u0435\u0433\u0438\u043e\u043d, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442   decl_df$general.post.region[i]&lt;-decl_raw[[i]]$general$post$region   #\u0423\u0447\u0440\u0435\u0436\u0434\u0435\u043d\u0438\u0435   decl_df$general.post.office[i]&lt;-decl_raw[[i]]$general$post$office   #\u0414\u043e\u043b\u0436\u043d\u043e\u0441\u0442\u044c   decl_df$general.post.post[i]&lt;-decl_raw[[i]]$general$post$post }  # #\u0411\u043e\u043b\u0435\u0435 \u0441\u043b\u043e\u0436\u043d\u044b\u0439 \u0441\u043b\u0443\u0447\u0430\u0439: \u043f\u043e\u0434\u0441\u0447\u0435\u0442 \u043a\u043e\u043b-\u0432\u0430 \u0442\u0440\u0430\u043d\u0441\u043f\u043e\u0440\u0442\u043d\u044b\u0445 \u0441\u0440\u0435\u0434\u0441\u0442\u0432 \u0438 \u0441\u0447\u0438\u0442\u044b\u0432\u0430\u043d\u0438\u0435 \u0438\u0445 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0439 #  #\u0414\u043e\u0431\u0430\u0432\u043b\u044f\u0435\u043c \u043a\u043e\u043b\u043e\u043d\u043a\u0438 decl_df$vehicle35&lt;-0 decl_df$vehicle36&lt;-0 decl_df$vehicle37&lt;-0 decl_df$vehicle38&lt;-0 decl_df$vehicle39&lt;-0 decl_df$vehicle40&lt;-0 decl_df$vehicle41&lt;-0 decl_df$vehicle42&lt;-0 decl_df$vehicle43&lt;-0 decl_df$vehicle44&lt;-0  #\u0421\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u043c \u0434\u0430\u043d\u043d\u044b\u0435 \u0438\u0437 \u0441\u043f\u0438\u0441\u043a\u0430 for (i in 1:length(decl_raw)) {    #   #\u041a\u043e\u043b-\u0432\u043e \u0442\u0440\u0430\u043d\u0441\u043f\u043e\u0440\u0442\u043d\u044b\u0445 \u0441\u0440\u0435\u0434\u0441\u0442\u0432 \u043f\u043e \u0441\u0442\u0430\u0442\u044c\u044f\u043c \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0438 (\u043f\u043f.35-44)   #      for (unit in 35:44)   {      j = 0     col_name&lt;-paste0(&quot;vehicle&quot;, unit)     raw_col_name&lt;-paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`&quot;)          if (length(eval(parse(text=raw_col_name)))!=0)       {       for (k in 1:length(eval(parse(text=raw_col_name))))       {         if (length(eval(parse(text=paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`[[&quot;,k, &quot;]]$brand&quot;))))!=0 && eval(parse(text=paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`[[&quot;,k, &quot;]]$brand&quot;)))!=&quot;&quot;)         {j = j+1}       }     }     decl_df[i, grep(col_name, colnames(decl_df))]&lt;-j   }  }    #\u0414\u043e\u0431\u0430\u0432\u043b\u044f\u0435\u043c \u043a\u043e\u043b\u043e\u043d\u043a\u0443 \u0434\u043b\u044f \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u0422\u0421 decl_df_all$vehicle_names&lt;-&quot;&quot;  for (i in 1:length(decl_raw)) {       vname&lt;-&quot;&quot;      for (unit in 35:44)   {     col_name&lt;-paste0(&quot;vehicle&quot;, unit)     raw_col_name&lt;-paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`&quot;)          if (length(eval(parse(text=raw_col_name)))!=0)       {       for (k in 1:length(eval(parse(text=raw_col_name))))       {         if (length(eval(parse(text=paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`[[&quot;,k, &quot;]]$brand&quot;))))!=0 && eval(parse(text=paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`[[&quot;,k, &quot;]]$brand&quot;)))!=&quot;&quot;)         {           vname=paste(vname,eval(parse(text=paste0(&quot;decl_raw[[&quot;,i,&quot;]]$vehicle$`&quot;,unit,&quot;`[[&quot;,k, &quot;]]$brand&quot;))), sep=&quot;;&quot;)         }       }     }   }   decl_df$vehicle_names[i]&lt;-vname }  <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  \u041d\u0430\u0447\u043d\u0435\u043c \u0441 \u0441\u0430\u043c\u043e\u0433\u043e \u043e\u0447\u0435\u0432\u0438\u0434\u043d\u043e\u0433\u043e \u0438 \u043f\u0440\u043e\u0441\u0442\u043e\u0433\u043e \u2014 \u0434\u043e\u0445\u043e\u0434\u0430. <\/p>\n<h4>\u0414\u043e\u0445\u043e\u0434\u044b \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432<\/h4>\n<p>  \u0414\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u044b \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u044e\u0442 \u0441\u0432\u043e\u0439 \u0434\u043e\u0445\u043e\u0434 \u0438 \u0434\u043e\u0445\u043e\u0434 \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u044c\u0438. \u0414\u043b\u044f \u043d\u0430\u0447\u0430\u043b\u0430 \u043f\u043e\u0441\u043c\u043e\u0442\u0440\u0438\u043c \u043d\u0430 \u0434\u043e\u0445\u043e\u0434 \u0432 \u0440\u0430\u0441\u0447\u0435\u0442\u0435 \u043d\u0430 \u043e\u0434\u043d\u043e\u0433\u043e \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u043f\u043e\u0434\u0441\u0447\u0435\u0442\u0430 \u0434\u043e\u0445\u043e\u0434\u0430 \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#decl_df \u2014 \u044d\u0442\u043e dataframe \u0441 \u0434\u0430\u043d\u043d\u044b\u043c\u0438 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439 \u0438\u0437 JSON \u0444\u0430\u0439\u043b\u0430 #\u0422\u0443\u0442 \u0438 \u0434\u0430\u043b\u0435\u0435 \u0446\u0438\u0444\u0440\u044b \u0432 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 \u043e\u0431\u044b\u0447\u043d\u043e \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u044e\u0442 \u043d\u0430 \u043f\u0443\u043d\u043a\u0442 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0438 #\u0427\u0442\u043e\u0431\u044b \u0438\u0437\u0431\u0435\u0436\u0430\u0442\u044c \u043e\u0448\u0438\u0431\u043e\u043a, \u043a\u043e\u0433\u0434\u0430 \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u044b\u0439 \u0434\u043e\u0445\u043e\u0434 \u043f\u043e\u0434\u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u043e,  #\u0441\u0443\u043c\u043c\u0438\u0440\u0443\u0435\u043c \u0432\u0441\u0435 \u0441\u0442\u0430\u0442\u044c\u0438 \u043b\u0438\u0447\u043d\u043e\u0433\u043e \u0434\u043e\u0445\u043e\u0434\u0430 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430  decl_df$income.own&lt;-decl_df$income.own.6+decl_df$income.own.7+decl_df$income.own.8+ decl_df$income.own.9+decl_df$income.own.10+decl_df$income.own.11+ decl_df$income.own.12+decl_df$income.own.13+decl_df$income.own.14+ decl_df$income.own.15+decl_df$income.own.16+decl_df$income.own.17+ decl_df$income.own.18+decl_df$income.own.19+decl_df$income.own.20+ decl_df$income.own.21  #\u0415\u0441\u043b\u0438 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442 \u0443\u043a\u0430\u0437\u0430\u043b \u043e\u0431\u0449\u0443\u044e \u0441\u0443\u043c\u043c\u0443, \u043d\u043e \u043d\u0435 \u0443\u043a\u0430\u0437\u0430\u043b \u0434\u043e\u0445\u043e\u0434 \u043f\u043e \u0441\u0442\u0430\u0442\u044c\u044f\u043c, \u0441\u0447\u0438\u0442\u0430\u0435\u043c \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u0443\u044e \u043e\u0431\u0449\u0443\u044e \u0441\u0443\u043c\u043c\u0443 \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u044b\u043c \u0434\u043e\u0445\u043e\u0434\u043e\u043c #\u0412 \u0438\u043d\u044b\u0445 \u0441\u043b\u0443\u0447\u0430\u0445 \u0441\u0447\u0438\u0442\u0430\u0435\u043c \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u044b\u043c \u0434\u043e\u0445\u043e\u0434\u043e\u043c \u043f\u043e\u0434\u0441\u0447\u0438\u0442\u0430\u043d\u043d\u0443\u044e \u0441\u0443\u043c\u043c\u0443 \u043f\u043e \u0441\u0442\u0430\u0442\u044c\u044f\u043c  for (i in 1:nrow(decl_df)) {   if (decl_df$income.own[i]==0 && decl_df$income.own.5[i]&gt;0)     {decl_df$income.own[i]&lt;-decl_df$income.own.5[i]} }  #\u0410\u043d\u0430\u043b\u043e\u0433\u0438\u0447\u043d\u043e \u0441\u0447\u0438\u0442\u0430\u0435\u043c \u043e\u0431\u0449\u0438\u0439 \u0434\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438  decl_df$income.family&lt;-decl_df$income.family.6+decl_df$income.family.7+ decl_df$income.family.8+decl_df$income.family.9+decl_df$income.family.10+ decl_df$income.family.11+decl_df$income.family.12+ decl_df$income.family.13+decl_df$income.family.14+ decl_df$income.family.15+decl_df$income.family.16+ decl_df$income.family.17+decl_df$income.family.18+ decl_df$income.family.19+decl_df$income.family.20+ as.numeric(gsub(&quot;,&quot;, &quot;.&quot;, decl_df$income.family.22))  for (i in 1:nrow(decl_df)) {   if (decl_df$income.family[i]==0 && decl_df$income.family.5[i]&gt;0)     {decl_df$income.family[i]&lt;-decl_df$income.family.5[i]} }  #\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u0434\u043e\u0445\u043e\u0434 \u043d\u0430 \u043e\u0434\u043d\u043e\u0433\u043e \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438  decl_df$income_per_member&lt;-rowSums(cbind(decl_df$income.own,decl_df$income.family), na.rm=TRUE) decl_df$income_per_member&lt;-decl_df$income_per_member\/decl_df$number_of_family_members_incl_decl  #\u041f\u0435\u0440\u0435\u0432\u043e\u0434\u0438\u043c \u0435\u0433\u043e \u0432 \u0442\u044b\u0441.\u0433\u0440\u043d. decl_df$income_per_member_ths&lt;-decl_df$income_per_member\/1000 <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  \u0411\u0435\u0433\u043b\u044b\u0439 \u0432\u0437\u0433\u043b\u044f\u0434 \u043d\u0430 10%-\u043f\u0440\u043e\u0446\u0435\u043d\u0442\u0438\u043b\u0438 \u043f\u043e\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442, \u0447\u0442\u043e \u0432 \u0432\u0435\u0440\u0445\u043d\u0438\u0445 10% \u0435\u0441\u0442\u044c \u043a\u0430\u043a\u0438\u0435-\u0442\u043e \u0441\u0443\u043f\u0435\u0440-\u0431\u043e\u0433\u0430\u0447\u0438: \u0441\u0440\u0435\u0434\u043d\u0438\u0439 \u0434\u043e\u0445\u043e\u0434 \u0434\u043b\u044f \u0432\u0435\u0440\u0445\u043d\u0438\u0445 10% \u2014 305,8 \u043c\u043b\u043d.\u0433\u0440\u043d. \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438 (\u043e\u043a\u043e\u043b\u043e 12 \u043c\u043b\u043d.\u0434\u043e\u043b\u043b\u0430\u0440\u043e\u0432), \u043f\u0440\u0438 \u044d\u0442\u043e\u043c \u043d\u0430 90%-\u043c \u043f\u0440\u043e\u0446\u0435\u043d\u0442\u0438\u043b\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0432\u0441\u0435\u0433\u043e 382 \u0442\u044b\u0441.\u0433\u0440\u043d. <\/p>\n<pre><code class=\"python\">quantile(decl_df$income_per_member_ths, probs=seq(0,1,0.1)) <\/code><\/pre>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/21a\/916\/3b1\/21a9163b10fa4327a21afe978a94f5ed.PNG\"\/><\/p>\n<p>  \u0412 \u0440\u0430\u0437\u0440\u0435\u0437\u0435 \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432:<\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0433\u0440\u0430\u0444\u0438\u043a\u0430<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">qplot(data=decl_df, x=office_g, y = income_per_member_ths,        geom=&quot;boxplot&quot;,       xlab=&quot;\u0412\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u043e&quot;,       ylab=&quot;\u0414\u043e\u0445\u043e\u0434 \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438, \u0442\u044b\u0441.\u0433\u0440\u043d.&quot;,       main=&quot;\u0412\u0441\u0435 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u044b&quot;) <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/74c\/9e9\/b71\/74c9e9b71f0e44a48008a301e014f65f.png\"\/><\/p>\n<p>  \u0412\u043d\u0435\u0437\u0430\u043f\u043d\u043e \u043f\u0430\u0440\u043b\u0430\u043c\u0435\u043d\u0442. \u041f\u043e \u0432\u0441\u0435\u043c \u043e\u0441\u0442\u0430\u043b\u044c\u043d\u044b\u043c \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u0430\u043c \u0434\u043e\u0445\u043e\u0434 \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438 \u043d\u0435 \u043f\u0440\u0435\u0432\u044b\u0448\u0430\u0435\u0442 50 \u043c\u043b\u043d.\u0433\u0440\u043d. \u0432 \u0433\u043e\u0434. \u041e\u0442\u0441\u0435\u0435\u043c \u0430\u0443\u0442\u043b\u0430\u0435\u0440\u043e\u0432 \u0441 \u043e\u0447\u0435\u043d\u044c \u0432\u044b\u0441\u043e\u043a\u0438\u043c \u0434\u043e\u0445\u043e\u0434\u043e\u043c \u0438 \u043f\u043e\u0441\u043c\u043e\u0442\u0440\u0438\u043c \u043d\u0430 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0441 \u0434\u043e\u0445\u043e\u0434\u043e\u043c \u0434\u043e 1 \u043c\u043b\u043d.\u0433\u0440\u043d. \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438 \u0432 \u0433\u043e\u0434 (\u0442\u0430\u043a\u0438\u0445 97%):<\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0433\u0440\u0430\u0444\u0438\u043a\u0430<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">qplot(data=decl_df[decl_df$income_per_member_ths&lt;1000,],        x=office_g, y = income_per_member_ths, geom=&quot;boxplot&quot;,       xlab=&quot;\u0412\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u043e&quot;,       ylab=&quot;\u0414\u043e\u0445\u043e\u0434 \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438, \u0442\u044b\u0441.\u0433\u0440\u043d.&quot;,       main=&quot;\u0414\u043e\u0445\u043e\u0434 \u0434\u043e 1 \u043c\u043b\u043d.\u0433\u0440\u043d.&quot;) <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/f8e\/b5c\/194\/f8eb5c194d5a47b69402e2fd031e78e8.png\"\/><\/p>\n<p>  \u0412\u0438\u0434\u043d\u043e, \u0447\u0442\u043e \u0441\u0440\u0435\u0434\u043d\u0438\u0439 \u0434\u043e\u0445\u043e\u0434 \u0432\u044b\u0448\u0435 \u0432 \u0441\u0443\u0434\u0430\u0445 (231 \u0442\u044b\u0441.) \u0438 \u0432 \u043f\u0430\u0440\u043b\u0430\u043c\u0435\u043d\u0442\u0435 (209 \u0442\u044b\u0441.). \u0412 \u043e\u0441\u0442\u0430\u043b\u044c\u043d\u044b\u0445 \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u0430\u0445 \u0441\u0440\u0435\u0434\u043d\u0438\u0439 \u0434\u043e\u0445\u043e\u0434 \u043e\u043a\u043e\u043b\u043e 75-100 \u0442\u044b\u0441.\u0433\u0440\u043d. \u043d\u0430 \u0447\u043b\u0435\u043d\u0430 \u0441\u0435\u043c\u044c\u0438.<\/p>\n<h4>\u0414\u043e\u0445\u043e\u0434\u044b \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 vs \u0434\u043e\u0445\u043e\u0434\u044b \u0441\u0435\u043c\u0435\u0439<\/h4>\n<p>  \u041f\u043e\u0441\u043c\u043e\u0442\u0440\u0438\u043c, \u043a\u0430\u043a \u0441\u043e\u043e\u0442\u043d\u043e\u0441\u0438\u0442\u0441\u044f \u0434\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u0438 \u0434\u043e\u0445\u043e\u0434 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430. \u0422\u0443\u0442 \u0443\u0436\u0435 \u0441\u043c\u043e\u0442\u0440\u0438\u043c \u043d\u0430 \u0430\u0431\u0441\u043e\u043b\u044e\u0442\u043d\u044b\u0435 \u0441\u0443\u043c\u043c\u044b \u0431\u0435\u0437 \u043f\u0440\u0438\u0432\u044f\u0437\u043a\u0438 \u043a \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u0443 \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u044c\u0438. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0433\u0440\u0430\u0444\u0438\u043a\u0430<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0421\u043e\u0437\u0434\u0430\u0435\u043c dataframe \u0442\u043e\u043b\u044c\u043a\u043e \u0441\u0435\u043c\u0435\u0439\u043d\u044b\u0445 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 decl_family&lt;-decl_df[decl_df$number_of_family_members_incl_decl&gt;1,]  qplot(data=decl_family, y=income.own\/1000, x=income.family\/1000,       xlim=c(0,800000), ylim=c(0,800000),       xlab=&quot;\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438, \u0442\u044b\u0441.\u0433\u0440\u043d.&quot;, ylab=&quot;\u0414\u043e\u0445\u043e\u0434 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430, \u0442\u044b\u0441.\u0433\u0440\u043d.&quot;) <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/95e\/c70\/ce2\/95ec70ce238240aa88d897eb2b71f70e.png\"\/><\/p>\n<p>  \u0422\u0435 \u0436\u0435 \u043f\u0430\u0440\u043b\u0430\u043c\u0435\u043d\u0442\u0430\u0440\u0438\u0438-\u0430\u0443\u0442\u043b\u0430\u0435\u0440\u044b \u043c\u0435\u0448\u0430\u044e\u0442 \u0432\u043e\u0441\u043f\u0440\u0438\u044f\u0442\u0438\u044e. \u041f\u043e\u0441\u043c\u043e\u0442\u0440\u0438\u043c, \u043a\u0430\u043a \u0441\u043e\u043e\u0442\u043d\u043e\u0441\u0438\u0442\u0441\u044f \u0434\u043e\u0445\u043e\u0434 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u043e\u0432 \u0438 \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u0435\u0439 \u0434\u043b\u044f \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043c\u0430\u0441\u0441\u044b \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 (\u043e\u0433\u0440\u0430\u043d\u0438\u0447\u0438\u043c\u0441\u044f 1 \u043c\u043b\u043d.\u0433\u0440\u043d. \u0433\u043e\u0434\u043e\u0432\u043e\u0433\u043e \u0434\u043e\u0445\u043e\u0434\u0430 \u0438 \u0434\u043b\u044f \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430, \u0438 \u0434\u043b\u044f \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u0435\u0439 \u2014 \u0441\u0440\u0435\u0434\u0438 \u0441\u0435\u043c\u0435\u0439\u043d\u044b\u0445 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u043e\u0432 \u0442\u0430\u043a\u0438\u0445 94%):<\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0433\u0440\u0430\u0444\u0438\u043a\u0430<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">nrow(decl_family[decl_family$income.own&lt;1000000 & decl_family$income.family&lt;1000000,])\/nrow(decl_family)  qplot(data=decl_family, y=income.own\/1000, x=income.family\/1000,       xlim=c(0,1000), ylim=c(0,1000),       xlab=&quot;\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438, \u0442\u044b\u0441.\u0433\u0440\u043d.&quot;, ylab=&quot;\u0414\u043e\u0445\u043e\u0434 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430, \u0442\u044b\u0441.\u0433\u0440\u043d.&quot;,       main=&quot;\u0414\u043e\u0445\u043e\u0434 \u0434\u043e 1 \u043c\u043b\u043d.\u0433\u0440\u043d.&quot;) <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/1c4\/781\/d89\/1c4781d89e1d4495af670ee8c4040165.png\"\/><\/p>\n<p>  \u0412\u0438\u0434\u043d\u043e, \u0447\u0442\u043e \u0434\u043e\u0445\u043e\u0434 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 \u0447\u0430\u0449\u0435 \u0432\u044b\u0448\u0435 \u0434\u043e\u0445\u043e\u0434\u0430 \u0441\u0435\u043c\u044c\u0438 (\u0441\u043a\u043e\u043f\u043b\u0435\u043d\u0438\u0435 \u0442\u043e\u0447\u0435\u043a \u0432\u0434\u043e\u043b\u044c \u0432\u0435\u0440\u0442\u0438\u043a\u0430\u043b\u044c\u043d\u043e\u0439 \u043e\u0441\u0438), \u043d\u043e \u044d\u0442\u043e \u043c\u043e\u0436\u043d\u043e \u043e\u0431\u044a\u044f\u0441\u043d\u0438\u0442\u044c \u0438 \u0442\u0435\u043c, \u0447\u0442\u043e 77% \u0441\u0435\u043c\u0435\u0439\u043d\u044b\u0445 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u043e\u0432 \u2014 \u043c\u0443\u0436\u0447\u0438\u043d\u044b, \u0430 \u0434\u043e\u0445\u043e\u0434\u044b \u043c\u0443\u0436\u0447\u0438\u043d \u0432 \u0423\u043a\u0440\u0430\u0438\u043d\u0435 \u0432\u044b\u0448\u0435 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0436\u0435\u043d\u0449\u0438\u043d \u0432 \u0441\u0440\u0435\u0434\u043d\u0435\u043c \u043d\u0430 30% (<a href=\"http:\/\/www.unian.ua\/world\/1052545-rivnist-dohodiv-cholovikiv-i-jinok-moje-buti-dosyagnuta-ne-ranishe-2086-roku.html\">\u043f\u043e \u0434\u0430\u043d\u043d\u044b\u043c International Labour Organization<\/a>)<\/p>\n<p>  \u0412 \u0440\u0430\u0437\u043d\u044b\u0445 \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u0430\u0445 \u0441\u043e\u043e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435 \u043f\u0440\u0438\u043c\u0435\u0440\u043d\u043e \u043e\u0434\u0438\u043d\u0430\u043a\u043e\u0432\u043e\u0435 (\u0441\u043c.\u0433\u0440\u0430\u0444\u0438\u043a \u043d\u0438\u0436\u0435). \u0412 \u043f\u0430\u0440\u043b\u0430\u043c\u0435\u043d\u0442\u0435 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0431\u043e\u043b\u044c\u0448\u0435 \u043b\u044e\u0434\u0435\u0439, \u0441\u0435\u043c\u044c\u0438 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0437\u0430\u0440\u0430\u0431\u0430\u0442\u044b\u0432\u0430\u044e\u0442 \u0431\u043e\u043b\u044c\u0448\u0435. \u0412 \u0441\u0443\u0434\u0430\u0445 \u2014 \u043d\u0430\u043e\u0431\u043e\u0440\u043e\u0442 (\u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e, \u0438\u0437-\u0437\u0430 \u043e\u0442\u043d\u043e\u0441\u0438\u0442\u0435\u043b\u044c\u043d\u043e \u0432\u044b\u0441\u043e\u043a\u043e\u0439 \u0437\u0430\u0440\u043f\u043b\u0430\u0442\u043e\u0439 \u0441\u0443\u0434\u0435\u0439). <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432 \u0438 \u0433\u0440\u0430\u0444\u0438\u043a\u0430<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0421\u043e\u0437\u0434\u0430\u0435\u043c \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0443\u044e-\u0444\u0430\u043a\u0442\u043e\u0440 \u0438\u0437 4 \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u0439: #1.\u041d\u0435\u0442 \u0434\u043e\u0445\u043e\u0434\u0430 \u0443 \u0441\u0435\u043c\u044c\u0438 #2.\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u043c\u0435\u043d\u044c\u0448\u0435 75% \u0434\u043e\u0445\u043e\u0434\u0430 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 #3.\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u0441\u043e\u0438\u0437\u043c\u0435\u0440\u0438\u043c \u0441 \u0434\u043e\u0445\u043e\u0434\u043e\u043c \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 (\u0441\u043e\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442 \u043e\u0442 75% \u0434\u043e 150% \u0434\u043e\u0445\u043e\u0434\u0430 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430) #4.\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u043f\u0440\u0435\u0432\u044b\u0448\u0430\u0435\u0442 \u0434\u043e\u0445\u043e\u0434 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 \u0432 1,5 \u0438 \u0431\u043e\u043b\u044c\u0448\u0435 \u0440\u0430\u0437\u0430  decl_family$family.own.income.ratio&lt;-&quot;&quot;  for (i in 1:nrow(decl_family)) {   if (decl_family$income.family[i]==0)    {decl_family$family.own.income.ratio[i]&lt;-&quot;1.\u041d\u0435\u0442 \u0434\u043e\u0445\u043e\u0434\u0430 \u0443 \u0441\u0435\u043c\u044c\u0438&quot;}        else   {     if (decl_family$income.family[i]&lt;=0.75*decl_family$income.own[i])      {decl_family$family.own.income.ratio[i]&lt;-&quot;2.\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u043c\u0435\u043d\u044c\u0448\u0435 (&lt;0.75x)&quot;}          else     {       if (decl_family$income.family[i]&lt;=1.5*decl_family$income.own[i])        {         decl_family$family.own.income.ratio[i]&lt;-&quot;3.\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u0441\u043e\u0438\u0437\u043c\u0435\u0440\u0438\u043c (0.75-1.5\u0445)&quot;       }       if (decl_family$income.family[i]&gt;1.5*decl_family$income.own[i])        {         decl_family$family.own.income.ratio[i]&lt;-&quot;4.\u0414\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u0431\u043e\u043b\u044c\u0448\u0435, &gt;1.5x&quot;       }     }   } }  decl_family$family.own.income.ratio&lt;-as.factor(decl_family$family.own.income.ratio)  #\u0421\u043e\u0437\u0434\u0430\u0435\u043c \u0442\u0430\u0431\u043b\u0438\u0446\u0443 \u0441 % \u043f\u043e \u043a\u0430\u0436\u0434\u043e\u043c\u0443 \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u0443 y&lt;-as.data.frame(100*prop.table(table(decl_family$family.own.income.ratio,decl_family$office_g), margin=2))  #\u0421\u0442\u0440\u043e\u0438\u043c \u0433\u0440\u0430\u0444\u0438\u043a ggplot(y, aes(x = Var2, y = Freq, fill = Var1)) +   geom_bar(stat=&quot;identity&quot;)+   ylab(&quot;%&quot;) +   xlab(&quot;&quot;)+   theme(text = element_text(size=14), legend.title=element_blank(),axis.text.x = element_text(angle=90, size=12,vjust=1,hjust=1))+   geom_text(aes(label = round(Freq,0),ymax=100),size=4,vjust=1.5,position=&quot;stack&quot;)+   scale_fill_brewer() <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/6ac\/66b\/243\/6ac66b2439c04dffa6b4ab61025c4cf3.png\"\/><\/p>\n<h4>\u0418\u0437 \u043a\u0430\u043a\u0438\u0445 \u0438\u0441\u0442\u043e\u0447\u043d\u0438\u043a\u043e\u0432 \u043f\u043e\u043b\u0443\u0447\u0430\u044e\u0442 \u0434\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432? <\/h4>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/9fe\/75a\/3eb\/9fe75a3ebf20464e88339c62f53a08da.PNG\"\/><\/p>\n<p>  \u041d\u0430 \u043f\u0435\u0440\u0432\u043e\u043c \u043c\u0435\u0441\u0442\u0435 \u0434\u0438\u0432\u0438\u0434\u0435\u043d\u0434\u044b \u0438 \u043f\u0440\u043e\u0446\u0435\u043d\u0442\u044b \u2014 \u043d\u043e \u044d\u0442\u043e \u0442\u043e\u043b\u044c\u043a\u043e \u0431\u043b\u0430\u0433\u043e\u0434\u0430\u0440\u044f \u043f\u0430\u0440\u043b\u0430\u043c\u0435\u043d\u0442\u0443. \u0414\u0430\u043b\u0435\u0435 \u0438\u0434\u0443\u0442 \u0434\u043e\u0445\u043e\u0434\u044b \u043e\u0442 \u043f\u0440\u0435\u0434\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u0441\u043a\u043e\u0439 \u0434\u0435\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438, \u043f\u0440\u0438\u0447\u0435\u043c \u044d\u0442\u043e\u0442 \u0442\u0438\u043f \u0431\u043e\u043b\u0435\u0435 \u0445\u0430\u0440\u0430\u043a\u0442\u0435\u0440\u0435\u043d \u0434\u043b\u044f \u043c\u0435\u0441\u0442\u043d\u043e\u0439 \u0432\u043b\u0430\u0441\u0442\u0438 \u0438 \u043f\u0440\u043e\u043a\u0443\u0440\u0430\u0442\u0443\u0440\u044b, \u0447\u0442\u043e \u043d\u0430\u0432\u0435\u0432\u0430\u0435\u0442 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u043e\u0434\u043e\u0437\u0440\u0435\u043d\u0438\u044f. <\/p>\n<p>  \u0417\u0430\u0440\u043f\u043b\u0430\u0442\u0430 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u044c\u0438 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0442\u043e\u043b\u044c\u043a\u043e \u043d\u0430 \u0442\u0440\u0435\u0442\u044c\u0435\u043c \u043c\u0435\u0441\u0442\u0435 \u2014 \u0445\u043e\u0442\u044f \u0432 \u0446\u0435\u043b\u043e\u043c \u043f\u043e \u0423\u043a\u0440\u0430\u0438\u043d\u0435 \u043e\u043d\u0430 \u0437\u0430\u043d\u0438\u043c\u0430\u0435\u0442 \u043f\u0435\u0440\u0432\u043e\u0435 \u043c\u0435\u0441\u0442\u043e, \u0441\u043e\u0441\u0442\u0430\u0432\u043b\u044f\u044f \u043e\u043a\u043e\u043b\u043e 40% \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u043d\u0430\u0441\u0435\u043b\u0435\u043d\u0438\u044f (\u0441\u043e\u0433\u043b\u0430\u0441\u043d\u043e \u0413\u043e\u0441\u043a\u043e\u043c\u0441\u0442\u0430\u0442\u0443). <\/p>\n<h4>\u0418\u043d\u0434\u0435\u043a\u0441 \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0430<\/h4>\n<p>  \u0418\u0442\u0430\u043a, \u043a\u0440\u0430\u0442\u043a\u0438\u0439 \u043e\u0431\u0437\u043e\u0440 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0438 \u0438\u0445 \u0441\u0435\u043c\u0435\u0439 \u043c\u044b \u043f\u0440\u043e\u0448\u043b\u0438. <\/p>\n<p>  \u041e\u0434\u043d\u0430\u043a\u043e \u0446\u0435\u043b\u044c \u0443 \u043d\u0430\u0441 \u0434\u0440\u0443\u0433\u0430\u044f \u2014 \u043e\u0446\u0435\u043d\u0438\u0442\u044c \u0432\u0435\u0440\u043e\u044f\u0442\u043d\u043e\u0441\u0442\u044c \u0442\u043e\u0433\u043e, \u0447\u0442\u043e \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u043e\u043d\u0435\u0440\u043e\u043c. \u041f\u043e\u043d\u044f\u0442\u043d\u043e, \u0447\u0442\u043e \u0442\u043e\u043b\u044c\u043a\u043e \u0438\u0437 \u0434\u0430\u043d\u043d\u044b\u0445 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439 \u044d\u0442\u043e\u0433\u043e \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u043d\u0435\u043b\u044c\u0437\u044f, \u0434\u0430\u0436\u0435 \u043d\u0435\u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0438\u0435 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0438 \u0440\u0430\u0441\u0445\u043e\u0434\u043e\u0432 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0434\u043e\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044c\u0441\u0442\u0432\u043e\u043c \u0432\u0437\u044f\u0442\u043e\u0447\u043d\u0438\u0447\u0435\u0441\u0442\u0432\u0430. \u041f\u043e\u044d\u0442\u043e\u043c\u0443 \u0437\u0430\u0434\u0430\u0447\u0430 \u0441\u0435\u0439\u0447\u0430\u0441 \u2014 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u043d\u0435\u043a\u0438\u0439 \u0438\u043d\u0434\u0435\u043a\u0441 \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u043e\u043d\u043d\u043e\u0439 \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0430. <\/p>\n<p>  \u041a \u0441\u043e\u0436\u0430\u043b\u0435\u043d\u0438\u044e, \u0437\u0430\u0434\u0430\u0447\u0430 \u043d\u0435 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0440\u0435\u0448\u0435\u043d\u0430 \u043c\u0435\u0442\u043e\u0434\u0430\u043c\u0438 \u043c\u0430\u0448\u0438\u043d\u043d\u043e\u0433\u043e \u043e\u0431\u0443\u0447\u0435\u043d\u0438\u044f, \u0442\u0430\u043a \u043a\u0430\u043a \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0438 \u043e \u0446\u0435\u043b\u0435\u0432\u043e\u0439 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 \u2014 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u043e\u043d\u0435\u0440\u043e\u043c \u0438\u043b\u0438 \u043d\u0435\u0442 \u2014 \u0443 \u043d\u0430\u0441 \u043d\u0435\u0442. \u041f\u0440\u0438\u0434\u0435\u0442\u0441\u044f \u0434\u0435\u0439\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u044d\u043a\u0441\u043f\u0435\u0440\u0442\u043d\u044b\u043c \u043f\u0443\u0442\u0435\u043c. <\/p>\n<p>  \u0427\u0442\u043e \u043c\u043e\u0436\u0435\u0442 \u0441\u0432\u0438\u0434\u0435\u0442\u0435\u043b\u044c\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u043e \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u0438 \u0438 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043f\u0440\u043e\u0432\u0435\u0440\u0435\u043d\u043e \u043d\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0439? \u0412\u043e\u0442 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u0430\u0440\u0438\u0430\u043d\u0442\u044b. \u0414\u043b\u044f \u043f\u0440\u043e\u0441\u0442\u043e\u0442\u044b \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432 \u0437\u0430 \u043a\u0430\u0436\u0434\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u0431\u0443\u0434\u0435\u0442 \u043d\u0430\u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0442\u044c\u0441\u044f 1 \u0431\u0430\u043b\u043b. <\/p>\n<ul>\n<li>\u041a\u0440\u0443\u043f\u043d\u044b\u0435 \u0441\u0443\u043c\u043c\u044b \u043d\u0430 \u0441\u0447\u0435\u0442\u0430\u0445 \u0432 \u0431\u0430\u043d\u043a\u0430\u0445 \u043f\u0440\u0438 \u043d\u0438\u0437\u043a\u0438\u0445 \u0434\u043e\u0445\u043e\u0434\u0430\u0445 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 \u0438 \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u044c\u0438<\/li>\n<\/ul>\n<p>  \u0428\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u0442\u0441\u044f \u0442\u0435\u043c, \u0443 \u043a\u043e\u0433\u043e \u0441\u0443\u043c\u043c\u0430 \u043d\u0430 \u0441\u0447\u0435\u0442\u0430\u0445 \u0432 \u043f\u044f\u0442\u044c \u0438\u043b\u0438 \u0431\u043e\u043b\u0435\u0435 \u0440\u0430\u0437 \u043f\u0440\u0435\u0432\u044b\u0448\u0430\u0435\u0442 \u043e\u0431\u0449\u0438\u0439 \u0441\u0435\u043c\u0435\u0439\u043d\u044b\u0439 \u0433\u043e\u0434\u043e\u0432\u043e\u0439 \u0434\u043e\u0445\u043e\u0434. \u0422\u0430\u043a\u0438\u0445 294 \u0447\u0435\u043b\u043e\u0432\u0435\u043a\u0430. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u044b\u0439 \u0434\u043e\u0445\u043e\u0434 (\u043b\u0438\u0447\u043d\u044b\u0439 \u0438 \u0441\u0435\u043c\u044c\u0438) decl_df$income.own.and.family&lt;-decl_df$income.own+decl_df$income.family  #\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u0441\u0443\u043c\u043c\u044b \u043d\u0430 \u0441\u0447\u0435\u0442\u0430\u0445 \u0432 \u0431\u0430\u043d\u043a\u0430\u0445 (\u043f\u043f.45-53 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0438) decl_df$banks&lt;-decl_df$banks45+decl_df$banks47+decl_df$banks49+               decl_df$banks51+decl_df$banks52+decl_df$banks53  #\u0414\u0435\u043b\u0438\u043c \u0441\u0443\u043c\u043c\u044b \u043d\u0430 \u0441\u0447\u0435\u0442\u0430\u0445 \u043d\u0430 \u0434\u043e\u0445\u043e\u0434 decl_df$banks.income.ratio&lt;-decl_df$banks\/(decl_df$income.own.and.family+1)  #\u041f\u043e\u0434\u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u043c \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0443\u044e \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u043f\u043e \u044d\u0442\u043e\u043c\u0443 \u043f\u0443\u043d\u043a\u0442\u0443 #\u041f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u043c \u0435\u0435 \u0435\u0434\u0438\u043d\u0438\u0446\u0435 \u0432 \u0442\u0435\u0445 \u0441\u043b\u0443\u0447\u0430\u044f\u0445, \u043a\u043e\u0433\u0434\u0430 \u0441\u0443\u043c\u043c\u0430 \u043d\u0430 \u0441\u0447\u0435\u0442\u0430\u0445 #\u0432 5 \u0438 \u0431\u043e\u043b\u0435\u0435 \u0440\u0430\u0437 \u0432\u044b\u0448\u0435, \u0447\u0435\u043c \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u044b\u0439 \u0433\u043e\u0434\u043e\u0432\u043e\u0439 \u0434\u043e\u0445\u043e\u0434  decl_df$susp1&lt;-0  for (i in 1:nrow(decl_df)) {   if (decl_df$banks[i]&gt;5*decl_df$income.own.and.family[i])   {decl_df$susp1[i]&lt;-1} } <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <\/p>\n<ul>\n<li>\u041d\u0443\u043b\u0435\u0432\u043e\u0439 \u0434\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u0438 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430. \u041e\u043d, \u043a\u043e\u043d\u0435\u0447\u043d\u043e, \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043f\u0440\u0438\u0437\u043d\u0430\u043a\u043e\u043c \u043d\u0435\u0430\u043a\u043a\u0443\u0440\u0430\u0442\u043d\u043e \u0437\u0430\u043f\u043e\u043b\u043d\u0435\u043d\u043d\u043e\u0439 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u0438 \u2014 \u043d\u043e \u044d\u0442\u043e, \u0432\u043e-\u043f\u0435\u0440\u0432\u044b\u0445, \u0442\u043e\u0436\u0435 \u043d\u0435\u0445\u043e\u0440\u043e\u0448\u043e, \u0430 \u0432\u043e-\u0432\u0442\u043e\u0440\u044b\u0445, \u043c\u043e\u0436\u0435\u0442 \u0433\u043e\u0432\u043e\u0440\u0438\u0442\u044c \u043e \u0442\u043e\u043c, \u0447\u0442\u043e \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0443 \u0435\u0441\u0442\u044c \u0447\u0442\u043e \u0441\u043a\u0440\u044b\u0432\u0430\u0442\u044c. <\/li>\n<\/ul>\n<p>  \u0422\u0443\u0442 \u0432\u0441\u0435 \u043f\u0440\u043e\u0441\u0442\u043e. \u0422\u0430\u043a\u0438\u0445 \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c 50 \u0447\u0435\u043b\u043e\u0432\u0435\u043a.<\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">decl_df$susp2&lt;-0  for (i in 1:nrow(decl_df)) {   if (decl_df$income.own.and.family[i]==0)   {decl_df$susp2[i]&lt;-1} } <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <\/p>\n<ul>\n<li>\u0415\u0441\u043b\u0438 \u0438\u043c\u0443\u0449\u0435\u0441\u0442\u0432\u043e \u0437\u0430\u043f\u0438\u0441\u0430\u043d\u043e \u0432 \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u043c \u043d\u0430 \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u044c\u0438, \u043e\u0441\u043e\u0431\u0435\u043d\u043d\u043e \u0435\u0441\u043b\u0438 \u0443 \u043d\u0438\u0445 \u043d\u0438\u0437\u043a\u0438\u0435 \u0434\u043e\u0445\u043e\u0434\u044b<\/li>\n<\/ul>\n<p>  \u0428\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u043b\u0441\u044f \u0442\u0435\u043c, \u0443 \u043a\u043e\u0433\u043e \u0441\u0435\u043c\u044c\u044f \u0432\u043b\u0430\u0434\u0435\u0435\u0442 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u044c\u044e \u043f\u043b\u043e\u0449\u0430\u0434\u044c\u044e \u0431\u043e\u043b\u044c\u0448\u0435 \u0441\u0440\u0435\u0434\u043d\u0435\u0439 \u043f\u043e \u0432\u044b\u0431\u043e\u0440\u043a\u0435, \u0438 \u043f\u0440\u0438 \u044d\u0442\u043e\u043c \u0443 \u0441\u0430\u043c\u043e\u0433\u043e \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u043c\u0435\u043d\u044c\u0448\u0435, \u0447\u0435\u043c \u0443 \u0441\u0435\u043c\u044c\u0438. <\/p>\n<p>  \u0422\u0430\u043a\u0438\u0445 \u043f\u043e\u043b\u0443\u0447\u0438\u043b\u043e\u0441\u044c 478 \u0447\u0435\u043b\u043e\u0432\u0435\u043a. \u0415\u0441\u043b\u0438 \u043f\u0440\u0438 \u044d\u0442\u043e\u043c \u0434\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u043d\u0430\u0445\u043e\u0434\u0438\u043b\u0441\u044f \u0432 \u043d\u0438\u0436\u043d\u0438\u0445 25% \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0441\u0435\u043c\u0435\u0439, \u0442\u043e \u0431\u0430\u043b\u043b \u0443\u043c\u043d\u043e\u0436\u0430\u043b\u0441\u044f \u043d\u0430 2 \u2014 \u0442\u0430\u043a\u0438\u0445 49 \u0447\u0435\u043b\u043e\u0432\u0435\u043a. <\/p>\n<p>  \u0417\u0434\u0435\u0441\u044c \u044f \u0443\u0447\u0438\u0442\u044b\u0432\u0430\u043b\u0430 \u043a\u0432\u0430\u0440\u0442\u0438\u0440\u044b, \u0434\u043e\u043c\u0430, \u0434\u0430\u0447\u0438, \u0433\u0430\u0440\u0430\u0436\u0438 \u0438 \u0442.\u043f. \u2014 \u043d\u043e \u043d\u0435 \u0443\u0447\u0438\u0442\u044b\u0432\u0430\u043b\u0430 \u0437\u0435\u043c\u0435\u043b\u044c\u043d\u044b\u0435 \u0443\u0447\u0430\u0441\u0442\u043a\u0438, \u043f\u043e\u0442\u043e\u043c\u0443 \u0447\u0442\u043e \u0438\u0437-\u0437\u0430 \u0437\u0430\u043f\u0440\u0435\u0442\u0430 \u043d\u0430 \u043f\u0440\u043e\u0434\u0430\u0436\u0443 \u0441\/\u0445 \u0437\u0435\u043c\u043b\u0438 \u043c\u043d\u043e\u0433\u0438\u0435 \u0432\u044b\u0445\u043e\u0434\u0446\u044b \u0438\u0437 \u0441\u0435\u043b \u0438\u043c\u0435\u044e\u0442 \u0432\u043e \u0432\u043b\u0430\u0434\u0435\u043d\u0438\u0438 \u043f\u0430\u0438 \u0431\u044b\u0432\u0448\u0438\u0445 \u043a\u043e\u043b\u0445\u043e\u0437\u043d\u044b\u0445 \u0437\u0435\u043c\u0435\u043b\u044c, \u0438 \u043f\u043e \u0441\u0443\u0442\u0438 \u0447\u0435\u043b\u043e\u0432\u0435\u043a \u043c\u043e\u0436\u0435\u0442 \u043e\u0431\u043b\u0430\u0434\u0430\u0442\u044c \u0433\u0435\u043a\u0442\u0430\u0440\u0430\u043c\u0438 \u0437\u0435\u043c\u043b\u0438, \u043d\u0435 \u0438\u043c\u0435\u044f \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u0438 \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u0441 \u043d\u0435\u0435 \u0432\u044b\u0433\u043e\u0434\u0443. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0421\u0443\u043c\u043c\u0430\u0440\u043d\u0430\u044f \u043f\u043b\u043e\u0449\u0430\u0434\u044c \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u0432 \u0441\u043e\u0431\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0441\u0442\u0438 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 decl_df$estate.own&lt;-decl_df$estate24+decl_df$estate25+                     decl_df$estate26+decl_df$estate27+decl_df$estate28 #\u0421\u0443\u043c\u043c\u0430\u0440\u043d\u0430\u044f \u043f\u043b\u043e\u0449\u0430\u0434\u044c \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u0432 \u0441\u043e\u0431\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0441\u0442\u0438 \u0441\u0435\u043c\u044c\u0438 decl_df$estate.family&lt;-decl_df$estate30+decl_df$estate31+                     decl_df$estate32+decl_df$estate33+decl_df$estate34  #\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u0432\u0435\u0440\u0445\u043d\u044e\u044e \u0433\u0440\u0430\u043d\u0438\u0446\u0443 \u043f\u0435\u0440\u0432\u044b\u0445 25% \u043f\u043e \u0441\u0435\u043c\u0435\u0439\u043d\u043e\u043c\u0443 \u0434\u043e\u0445\u043e\u0434\u0443 x&lt;-quantile(decl_df[decl_df$number_of_family_members&gt;0,]$income.family, probs=seq(0,1,0.25))[2]   #\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u0441\u0440\u0435\u0434\u043d\u044e\u044e \u043f\u043e \u0432\u044b\u0431\u043e\u0440\u043a\u0435 \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u0443\u044e \u043f\u043b\u043e\u0449\u0430\u0434\u044c \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u0441\u0435\u043c\u044c\u0438 y&lt;-mean(decl_df[decl_df$number_of_family_members&gt;0,]$estate.family)  #\u0415\u0441\u043b\u0438 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u0443 \u0441\u0435\u043c\u044c\u0438 \u0431\u043e\u043b\u044c\u0448\u0435 \u0441\u0440\u0435\u0434\u043d\u0435\u0433\u043e \u043f\u043e \u0432\u044b\u0431\u043e\u0440\u043a\u0435 \u0438 \u0431\u043e\u043b\u044c\u0448\u0435 \u0447\u0435\u043c \u0443 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 #\u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u043c \u0448\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b  decl_df$susp3&lt;-0  for (i in 1:nrow(decl_df)) {   if (decl_df$estate.family[i]&gt;y & decl_df$estate.family[i]&gt;decl_df$estate.own[i])   {     #\u0415\u0441\u043b\u0438 \u043f\u0440\u0438 \u044d\u0442\u043e\u043c \u0434\u043e\u0445\u043e\u0434 \u0441\u0435\u043c\u044c\u0438 \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0432 \u043d\u0438\u0436\u043d\u0435\u043c \u043a\u0432\u0430\u0440\u0442\u0438\u043b\u0435, \u0443\u043c\u043d\u043e\u0436\u0430\u0435\u043c \u0431\u0430\u043b\u043b \u043d\u0430 \u0434\u0432\u0430     if (decl_df$income.family[i]&lt;x)     {decl_df$susp3[i]&lt;-2}     else     {decl_df$susp3[i]&lt;-1}   }    } <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <\/p>\n<ul>\n<li>\u041a\u0440\u0443\u043f\u043d\u044b\u0435 \u0441\u0443\u043c\u043c\u044b \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0438\u0437-\u0437\u0430 \u0433\u0440\u0430\u043d\u0438\u0446\u044b (\u043c\u043e\u0436\u0435\u0442 \u0441\u0432\u0438\u0434\u0435\u0442\u0435\u043b\u044c\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u043e\u0431 \u043e\u0442\u043c\u044b\u0432\u0430\u043d\u0438\u0438 \u0441\u0440\u0435\u0434\u0441\u0442\u0432)<\/li>\n<\/ul>\n<p>  \u0412\u0441\u0435\u0433\u043e \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0438\u043b\u043e\u0441\u044c 128 \u0447\u0435\u043b\u043e\u0432\u0435\u043a, \u0443 \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u0431\u044b\u043b\u0438 \u0434\u043e\u0445\u043e\u0434\u044b \u0438\u0437-\u0437\u0430 \u0433\u0440\u0430\u043d\u0438\u0446\u044b (\u043b\u0438\u0447\u043d\u044b\u0435 \u0438\u043b\u0438 \u0441\u0435\u043c\u0435\u0439\u043d\u044b\u0435). \u0418\u0437 \u043d\u0438\u0445 \u0443 44 \u0447\u0435\u043b\u043e\u0432\u0435\u043a \u044d\u0442\u0438 \u0434\u043e\u0445\u043e\u0434\u044b \u043f\u0440\u0435\u0432\u044b\u0448\u0430\u043b\u0438 \u0434\u043e\u0445\u043e\u0434\u044b \u0432 \u0423\u043a\u0440\u0430\u0438\u043d\u0435 \u2014 \u0438\u0445 \u0438 \u043f\u0440\u0438\u0437\u043d\u0430\u0435\u043c \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0414\u043e\u0445\u043e\u0434\u044b \u0438\u0437-\u0437\u0430 \u0433\u0440\u0430\u043d\u0438\u0446\u044b (\u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 \u0438 \u0441\u0435\u043c\u044c\u0438) decl_df$income.from.abroad&lt;-decl_df$income.own.21+as.double(decl_df$income.family.22)  decl_df$susp4&lt;-0  for (i in 1:nrow(decl_df)) { #\u0415\u0441\u043b\u0438 \u0434\u043e\u0445\u043e\u0434 \u0438\u0437-\u0437\u0430 \u0433\u0440\u0430\u043d\u0438\u0446\u044b \u0431\u043e\u043b\u044c\u0448\u0435, \u0447\u0435\u043c \u0434\u043e\u0445\u043e\u0434 \u0432\u043d\u0443\u0442\u0440\u0438 \u0441\u0442\u0440\u0430\u043d\u044b \u2014 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u043c \u0431\u0430\u043b\u043b   if (decl_df$income.from.abroad[i]&gt;  decl_df$income.own.and.family[i]-decl_df$income.from.abroad[i])   {decl_df$susp4[i]&lt;-1} } <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <\/p>\n<ul>\n<li>\u041d\u0430\u043b\u0438\u0447\u0438\u0435 \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u0438\u0445 \u0430\u0432\u0442\u043e\u043c\u043e\u0431\u0438\u043b\u0435\u0439 \u043f\u0440\u0438 \u043e\u0442\u0441\u0443\u0442\u0441\u0442\u0432\u0438\u0438 \u0436\u0438\u043b\u044c\u044f<\/li>\n<\/ul>\n<p>  \u0412\u043e\u0437\u044c\u043c\u0435\u043c \u0442\u0435\u0445, \u0443 \u043a\u043e\u0433\u043e \u0431\u043e\u043b\u0435\u0435 \u0434\u0432\u0443\u0445 \u0430\u0432\u0442\u043e \u0438 \u043d\u0435\u0442 \u0436\u0438\u043b\u044c\u044f. \u0422\u0430\u043a\u0438\u0445 31 \u0447\u0435\u043b\u043e\u0432\u0435\u043a.<\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u041a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u043e \u0430\u0432\u0442\u043e (\u043b\u0435\u0433\u043a\u043e\u0432\u044b\u0445 \u0438 \u0433\u0440\u0443\u0437\u043e\u0432\u044b\u0445) \u0432 \u0441\u0435\u043c\u044c\u0435 decl_df$vehicles&lt;-decl_df$vehicle35+decl_df$vehicle36+                   decl_df$vehicle40+decl_df$vehicle41  decl_df$susp5&lt;-0  for (i in 1:nrow(decl_df)) {  if (decl_df$vehicles[i]&gt;2 &  decl_df$estate.own[i]==0 & decl_df$estate.family[i]==0)  {decl_df$susp5[i]&lt;-1} } <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<ul>\n<li>\u041d\u0430\u043b\u0438\u0447\u0438\u0435 \u0430\u0432\u0442\u043e\u043c\u043e\u0431\u0438\u043b\u0435\u0439 \u043a\u043b\u0430\u0441\u0441\u0430 \u043b\u044e\u043a\u0441<\/li>\n<\/ul>\n<p>  \u042f \u043d\u0435 \u043d\u0430\u0448\u043b\u0430 \u043a\u0430\u043a\u043e\u0439-\u043b\u0438\u0431\u043e \u0443\u0442\u0432\u0435\u0440\u0436\u0434\u0435\u043d\u043d\u043e\u0439 \u043a\u043b\u0430\u0441\u0441\u0438\u0444\u0438\u043a\u0430\u0446\u0438\u0438 \u0430\u0432\u0442\u043e\u043c\u043e\u0431\u0438\u043b\u0435\u0439 \u0441\u043e \u0441\u043f\u0438\u0441\u043a\u043e\u043c \u043c\u0430\u0440\u043e\u043a \u0438 \u043c\u043e\u0434\u0435\u043b\u0435\u0439, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043c\u043e\u0436\u043d\u043e \u043e\u0442\u043d\u0435\u0441\u0442\u0438 \u043a \u043a\u043b\u0430\u0441\u0441\u0443 \u043b\u044e\u043a\u0441. \u041f\u043e\u044d\u0442\u043e\u043c\u0443 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043b\u0430\u0441\u044c \u0432\u0438\u043a\u0438-\u0441\u0442\u0430\u0442\u044c\u0435\u0439 <a href=\"https:\/\/en.wikipedia.org\/wiki\/Luxury_vehicle\">Luxury vehicle<\/a>. <\/p>\n<p>  \u0412 \u0438\u0442\u043e\u0433\u0435 \u0441\u043f\u0438\u0441\u043e\u043a \u043f\u043e\u043b\u0443\u0447\u0438\u043b\u0441\u044f \u0442\u0430\u043a\u0438\u043c: Acura, Alfa Romeo Giulia, Audi A4, Audi A6, Audi A7, Audi A8, Bentley, BMW 3, BMW 5, BMW 7, Cadillac, Ferrari, Hummer, Infinity, Jaguar, Lamborghini, Land Rover, Lexus, Maserati, Mercedes-Benz C, Mercedes-Benz E, Mercedes-Benz GL, Mercedes-Benz S, Porsche, Rolls-Royce, Saab 9-3, Saab 9-5, Volkswagen Phaeton, Volvo S60, Volvo S80.<\/p>\n<p>  \u0428\u0442\u0440\u0430\u0444 \u043d\u0430\u0447\u0438\u0441\u043b\u044f\u043b\u0441\u044f \u0442\u0435\u043c, \u0443 \u043a\u043e\u0433\u043e \u0435\u0441\u0442\u044c \u0445\u043e\u0442\u044f \u0431\u044b \u043e\u0434\u0438\u043d \u0438\u0437 \u044d\u0442\u0438\u0445 \u0430\u0432\u0442\u043e\u043c\u043e\u0431\u0438\u043b\u0435\u0439, \u043d\u043e \u043d\u0435 \u043d\u0430\u0447\u0438\u0441\u043b\u044f\u043b\u0441\u044f, \u0435\u0441\u043b\u0438 \u044d\u0442\u043e \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0435 \u0430\u0432\u0442\u043e \u0432 \u0441\u0435\u043c\u044c\u0435 (\u043c\u0430\u043b\u043e \u043b\u0438, \u0432\u0434\u0440\u0443\u0433 \u043a\u043e\u043f\u0438\u043b\u0438 \u0432\u0441\u044e \u0436\u0438\u0437\u043d\u044c). \u0412\u0441\u0435\u0433\u043e \u0442\u0430\u043a\u0438\u0445 653 \u0447\u0435\u043b\u043e\u0432\u0435\u043a\u0430. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0412\u0435\u043a\u0442\u043e\u0440 \u0441 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u044f\u043c\u0438 \u0430\u0432\u0442\u043e luxury_cars&lt;-c('Acura',\t'Lexus',\t'Cadillac',\t'Alfa Romeo Giulia',\t'Jaguar',\t'Volvo S60',\t'Infinity',\t'Saab 9-3',\t'BMW 3',\t'Audi A4',\t'Mercedes-Benz C',\t'Volvo S80',\t'Audi A6',\t'Audi A7',\t'Mercedes-Benz E',\t'Saab 9-5',\t'Maserati',\t'BMW 5',\t'BMW 7',\t'Audi A8',\t'Mercedes-Benz S',\t'Porsche',\t'Volkswagen Phaeton',\t'Rolls-Royce',\t'Bentley',\t'Ferrari',\t'Lamborghini',\t'Mercedes-Benz GL',\t'Hummer',\t'Land Rover')  for (j in (1:nrow(decl_df))) {   decl_df$susp5.1[j]&lt;-0   for (i in (1:length(luxury_cars)))   {     #\u0415\u0441\u043b\u0438 \u0432 \u0441\u043f\u0438\u0441\u043a\u0435 \u043c\u0430\u0448\u0438\u043d \u0432\u0441\u0442\u0440\u0435\u0447\u0430\u0435\u0442\u0441\u044f \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435 \u0438\u0437 \u0432\u0435\u043a\u0442\u043e\u0440\u0430     if (grepl(luxury_cars[i], decl_df$vehicle_names[j],                    ignore.case=TRUE)==TRUE)         {             #\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u043a\u043e\u043b-\u0432\u043e \u0442\u0430\u043a\u0438\u0445 \u043c\u0430\u0448\u0438\u043d             decl_df$susp5.1[j]&lt;-decl_df$susp5.1[j]+             length(gregexpr(luxury_cars[i], decl_df$vehicle_names[j],ignore.case=TRUE)[[1]])         }   } }  decl_df$susp5.2&lt;-0  #\u0415\u0441\u043b\u0438 \u0435\u0441\u0442\u044c \u044d\u043b\u0438\u0442\u043d\u044b\u0435 \u0430\u0432\u0442\u043e - \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u043c \u0448\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b for (i in (1:nrow(decl_df))) {if (decl_df$susp5.1[i]&gt;0) decl_df$susp5.2[i]&lt;-1}  #\u0415\u0441\u043b\u0438 \u044d\u0442\u043e \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0435 \u0430\u0432\u0442\u043e - \u0441\u043d\u0438\u043c\u0430\u0435\u043c \u0448\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b for (i in (1:nrow(decl_df))) {if (decl_df$vehicles[i]==1) decl_df$susp5.2[i]&lt;-0} <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <\/p>\n<ul>\n<li>\u0412\u044b\u0441\u043e\u043a\u0438\u0435 \u0434\u043e\u0445\u043e\u0434\u044b \u0447\u043b\u0435\u043d\u043e\u0432 \u0441\u0435\u043c\u044c\u0438 \u043e\u0442 \u043f\u0440\u0435\u0434\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u0441\u043a\u043e\u0439 \u0434\u0435\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438. <\/li>\n<\/ul>\n<p>  \u0428\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b \u043d\u0430\u0447\u0438\u0441\u043b\u044f\u043b\u0441\u044f \u0442\u0435\u043c, \u0443 \u043a\u043e\u0433\u043e \u0441\u043e\u043e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0441\u0435\u043c\u044c\u0438 \u043e\u0442 \u043f\u0440\u0435\u0434\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u0441\u043a\u043e\u0439 \u0434\u0435\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u043a \u043e\u0431\u0449\u0435\u043c\u0443 \u0434\u043e\u0445\u043e\u0434\u0443 \u0431\u044b\u043b\u043e \u0432\u044b\u0448\u0435 \u0441\u0440\u0435\u0434\u043d\u0435\u0433\u043e \u043f\u043e \u0432\u044b\u0431\u043e\u0440\u043a\u0435. \u0422\u0430\u043a\u0438\u0445 \u043e\u043a\u0430\u0437\u0430\u043b\u043e\u0441\u044c 419 \u0447\u0435\u043b\u043e\u0432\u0435\u043a.<\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">#\u0418\u0437\u043d\u0430\u0447\u0430\u043b\u044c\u043d\u043e \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u043c \u043a\u043e\u044d\u0444\u0444\u0438\u0446\u0438\u0435\u043d\u0442\u0443 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 0 decl_df$familyPE.own.income.ratio&lt;-0  #\u0414\u043b\u044f \u0442\u0435\u0445, \u0443 \u043a\u043e\u0433\u043e \u043d\u0435 \u043d\u0443\u043b\u0435\u0432\u043e\u0439 \u0434\u043e\u0445\u043e\u0434, \u0441\u0447\u0438\u0442\u0430\u0435\u043c \u0441\u043e\u043e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435 \u0434\u043e\u0445\u043e\u0434\u0430  #\u0441\u0435\u043c\u044c\u0438 \u043e\u0442 \u043f\u0440\u0435\u0434\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u0441\u043a\u043e\u0439 \u0434\u0435\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u043a \u043e\u0431\u0449\u0435\u043c\u0443 \u0434\u043e\u0445\u043e\u0434\u0443 \u0441\u0435\u043c\u044c\u0438 \u0438 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 decl_df[decl_df$income.own.and.family&gt;0,]$familyPE.own.income.ratio&lt;- decl_df[decl_df$income.own.and.family&gt;0,]$income.family.17\/decl_df[decl_df$income.own.and.family&gt;0,]$income.own.and.family  #\u0421\u0440\u0435\u0434\u043d\u0435\u0435 \u043f\u043e \u0432\u044b\u0431\u043e\u0440\u043a\u0435 \u0441\u043e\u043e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435 \u0434\u043e\u0445\u043e\u0434\u0430 \u0441\u0435\u043c\u044c\u0438 \u043e\u0442 \u043f\u0440\u0435\u0434\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u0441\u043a\u043e\u0439 \u0434\u0435\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u043a \u043e\u0431\u0449\u0435\u043c\u0443 \u0434\u043e\u0445\u043e\u0434\u0443.\u0421\u0447\u0438\u0442\u0430\u0435\u043c \u0442\u043e\u043b\u044c\u043a\u043e \u0434\u043b\u044f \u0442\u0435\u0445, \u0443 \u043a\u043e\u0433\u043e \u0432 \u0441\u0435\u043c\u044c\u0435 \u0435\u0441\u0442\u044c \u0434\u043e\u0445\u043e\u0434 \u043e\u0442 \u043f\u0440\u0435\u0434\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u0441\u043a\u043e\u0439 \u0434\u0435\u044f\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 x&lt;-mean(decl_df[decl_df$income.family.17&gt;0,]$familyPE.own.income.ratio)  decl_df$susp6&lt;-0  #\u0415\u0441\u043b\u0438 \u0441\u043e\u043e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435 \u0431\u043e\u043b\u044c\u0448\u0435 \u0441\u0440\u0435\u0434\u043d\u0435\u0433\u043e \u2014 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u043c \u0448\u0442\u0440\u0430\u0444\u043d\u043e\u0439 \u0431\u0430\u043b\u043b  for (i in 1:nrow(decl_df)) {   if (decl_df$familyPE.own.income.ratio[i]&gt;x)   {decl_df$susp6[i]&lt;-1} } <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  <\/p>\n<ul>\n<li>\u0412\u043b\u0430\u0434\u0435\u043d\u0438\u0435 \u044d\u043b\u0438\u0442\u043d\u043e\u0439 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u044c\u044e (\u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0435 \u0434\u0430\u043d\u043d\u044b\u0445 garnahata)<\/li>\n<\/ul>\n<p>  \u041f\u0440\u043e\u0435\u043a\u0442 \u00ab\u0413\u0430\u0440\u043d\u0430\u0425\u0430\u0442\u0430\u00bb \u0441\u043e\u0431\u0438\u0440\u0430\u0435\u0442 \u0434\u0430\u043d\u043d\u044b\u0435 \u043e \u0441\u043e\u0431\u0441\u0442\u0432\u0435\u043d\u043d\u0438\u043a\u0430\u0445 \u0434\u043e\u0440\u043e\u0433\u043e\u0439 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u2014 \u044d\u0442\u043e \u043e\u0444\u0438\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0435 \u0434\u0430\u043d\u043d\u044b\u0435 \u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0435 \u0413\u043e\u0441\u0443\u0434\u0430\u0440\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0433\u043e \u0440\u0435\u0435\u0441\u0442\u0440\u0430 \u0438\u043c\u0443\u0449\u0435\u0441\u0442\u0432\u0435\u043d\u043d\u044b\u0445 \u043f\u0440\u0430\u0432. <\/p>\n<p>  \u0414\u043b\u044f \u043d\u0430\u0448\u0438\u0445 \u0446\u0435\u043b\u0435\u0439 \u044f \u0441\u0440\u0430\u0432\u043d\u0438\u043b\u0430 \u0424\u0418\u041e \u0441\u043e\u0431\u0441\u0442\u0432\u0435\u043d\u043d\u0438\u043a\u043e\u0432 \u0441 \u0424\u0418\u041e \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u043e\u0432 \u2014 \u043f\u0440\u0438 \u043f\u043e\u043b\u043d\u043e\u043c \u0441\u043e\u0432\u043f\u0430\u0434\u0435\u043d\u0438\u0438 (\u0442\u0430\u043a\u0438\u0445 \u0431\u044b\u043b\u043e 80 \u0447\u0435\u043b\u043e\u0432\u0435\u043a) \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0443 \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u043b\u0441\u044f 1 \u0431\u0430\u043b\u043b \u043a \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438. <\/p>\n<p>  \u041a\u0440\u043e\u043c\u0435 \u0442\u043e\u0433\u043e, \u044f \u0441\u0434\u0435\u043b\u0430\u043b\u0430 \u0441\u0432\u0435\u0440\u043a\u0443 \u0442\u043e\u043b\u044c\u043a\u043e \u043f\u043e \u0444\u0430\u043c\u0438\u043b\u0438\u0438 (\u0431\u0435\u0437 \u0438\u043c\u0435\u043d\u0438 \u0438 \u043e\u0442\u0447\u0435\u0441\u0442\u0432\u0430) \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430 \u0438\u043b\u0438 \u0444\u0430\u043c\u0438\u043b\u0438\u0438 \u0440\u043e\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u0438\u043a\u043e\u0432, \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u043e\u043d \u0443\u043a\u0430\u0437\u0430\u043b \u0432 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u0446\u0438\u044f\u0445. \u041f\u043e\u0441\u043a\u043e\u043b\u044c\u043a\u0443 \u0444\u0430\u043c\u0438\u043b\u0438\u0438 \u0431\u044b\u0432\u0430\u044e\u0442 \u0440\u0430\u0441\u043f\u0440\u043e\u0441\u0442\u0440\u0430\u043d\u0435\u043d\u043d\u044b\u0435, \u0442\u043e \u0441\u043e\u0432\u043f\u0430\u0434\u0435\u043d\u0438\u0439 \u0431\u044b\u043b\u043e \u043c\u043d\u043e\u0433\u043e (\u0431\u043e\u043b\u0435\u0435 2 \u0442\u044b\u0441\u044f\u0447), \u043d\u043e \u0438 \u043a \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044e \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438 \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u043b\u043e\u0441\u044c \u0442\u043e\u043b\u044c\u043a\u043e 0,5 \u0431\u0430\u043b\u043b\u0430. <\/p>\n<p>  \u0421\u0432\u0435\u0440\u043a\u0430 \u0434\u0435\u043b\u0430\u043b\u0430\u0441\u044c \u0432 Excel, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u0431\u0435\u0437 \u043a\u043e\u0434\u0430<\/p>\n<h4>\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u044b<\/h4>\n<p>  \u0421\u043b\u043e\u0436\u0438\u0432 \u0432\u043c\u0435\u0441\u0442\u0435 \u0431\u0430\u043b\u043b\u044b \u043f\u043e \u0432\u0441\u0435\u043c \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c \u043f\u0443\u043d\u043a\u0442\u0430\u043c, \u044f \u043f\u043e\u043b\u0443\u0447\u0438\u043b\u0430 \u043e\u0431\u0449\u0438\u0439 \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044c \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u0438. <\/p>\n<div class=\"spoiler\"><b class=\"spoiler_title\">\u041a\u043e\u0434 \u0434\u043b\u044f \u0440\u0430\u0441\u0447\u0435\u0442\u043e\u0432<\/b><\/p>\n<div class=\"spoiler_text\">\n<pre><code class=\"python\">decl_df$suspicious&lt;-decl_df$susp1+decl_df$susp2+                     decl_df$susp3+decl_df$susp4+decl_df$susp5+decl_df$susp5.2+                     decl_df$susp6+decl_df$hata_own+decl_df$hata_family*0.5 <\/code><\/pre>\n<p>  <\/div>\n<\/div>\n<p>  \u0418\u0437 10 346 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u043e\u0432 \u043e\u043d \u0431\u044b\u043b \u0431\u043e\u043b\u044c\u0448\u0435 \u043d\u0443\u043b\u044f \u0434\u043b\u044f 3971, \u043d\u043e \u044d\u0442\u043e \u0432 \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u043c \u0437\u0430 \u0441\u0447\u0435\u0442 \u0441\u043e\u0432\u043f\u0430\u0434\u0435\u043d\u0438\u044f \u0444\u0430\u043c\u0438\u043b\u0438\u0438 \u0438\u0437 \u0440\u0435\u0435\u0441\u0442\u0440\u0430 \u043d\u0435\u0434\u0432\u0438\u0436\u0438\u043c\u043e\u0441\u0442\u0438 \u2014 \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044c \u0432\u044b\u0448\u0435 0,5 \u0437\u0430\u0444\u0438\u043a\u0441\u0438\u0440\u043e\u0432\u0430\u043d \u0434\u043b\u044f 1461 \u0434\u0435\u043a\u043b\u0430\u0440\u0430\u043d\u0442\u0430. \u041c\u0430\u043a\u0441\u0438\u043c\u0430\u043b\u044c\u043d\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044f \u2014 5 (\u0438\u0437 \u0442\u0435\u043e\u0440\u0435\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0433\u043e \u043c\u0430\u043a\u0441\u0438\u043c\u0443\u043c\u0430 9,5).<\/p>\n<p>  \u0420\u0430\u0441\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u043f\u043e \u0432\u0435\u0434\u043e\u043c\u0441\u0442\u0432\u0430\u043c \u0441\u043d\u043e\u0432\u0430 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u043d\u0430 \u043f\u0430\u0440\u043b\u0430\u043c\u0435\u043d\u0442:<\/p>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/3ec\/3a0\/888\/3ec3a088852144cebdfeae0936bc2b6b.png\"\/>       <\/p>\n<div class=\"clear\"><\/div>\n<p> \u0441\u0441\u044b\u043b\u043a\u0430 \u043d\u0430 \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b \u0441\u0442\u0430\u0442\u044c\u0438 <a href=\"http:\/\/habrahabr.ru\/post\/271773\/\"> http:\/\/habrahabr.ru\/post\/271773\/<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>       \u041a\u0430\u043a \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432, \u043d\u0430\u0438\u0431\u043e\u043b\u0435\u0435 \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0441 \u0442\u043e\u0447\u043a\u0438 \u0437\u0440\u0435\u043d\u0438\u044f \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u0438? \u041f\u0440\u043e\u0449\u0435 \u0432\u0441\u0435\u0433\u043e \u2014 \u0441\u0440\u0430\u0432\u043d\u0438\u0432 \u0438\u0445 \u0434\u043e\u0445\u043e\u0434\u044b \u0438 \u0443\u0440\u043e\u0432\u0435\u043d\u044c \u0436\u0438\u0437\u043d\u0438. <\/p>\n<p>  \u0412 \u044d\u0442\u043e\u0439 \u0441\u0442\u0430\u0442\u044c\u0435 \u044f \u0445\u043e\u0447\u0443 \u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u0438 \u0441\u0430\u0439\u0442\u043e\u0432 \u0441 \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0439 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0435\u0439 \u043e \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0430\u0445, \u043f\u043e\u0441\u043c\u043e\u0442\u0440\u0435\u0442\u044c \u043d\u0430 \u0442\u043e, \u043a\u0430\u043a \u044d\u0442\u0438 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u0438 \u0436\u0438\u0432\u0443\u0442 \u0438 \u043f\u043e\u043f\u044b\u0442\u0430\u0442\u044c\u0441\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u0442\u0435\u0445, \u043a\u0442\u043e \u043d\u0430\u0438\u0431\u043e\u043b\u0435\u0435 \u043f\u043e\u0434\u043e\u0437\u0440\u0438\u0442\u0435\u043b\u0435\u043d \u0441 \u0442\u043e\u0447\u043a\u0438 \u0437\u0440\u0435\u043d\u0438\u044f \u043a\u043e\u0440\u0440\u0443\u043f\u0446\u0438\u0438. <\/p>\n<p>  \u041f\u043e\u0447\u0435\u043c\u0443 \u043e\u0442\u043a\u0440\u044b\u0442\u0430\u044f \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u044f \u043e \u0434\u043e\u0445\u043e\u0434\u0430\u0445 \u0447\u0438\u043d\u043e\u0432\u043d\u0438\u043a\u043e\u0432 \u0432\u0430\u0436\u043d\u0430? \u041f\u043e\u0442\u043e\u043c\u0443 \u0447\u0442\u043e \u044d\u0442\u043e \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0438\u0445 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u0438\u0440\u043e\u0432\u0430\u0442\u044c. <\/p>\n<p>  <img decoding=\"async\" src=\"https:\/\/habrastorage.org\/files\/b21\/866\/e75\/b21866e7543349f9a672d1aa2c3a8270.PNG\" alt=\"image\"\/><br \/>  <i>\u0424\u043e\u0442\u043e \u0438\u0437 \u0438\u043d\u0441\u0442\u0430\u0433\u0440\u0430\u043c\u043c\u0430 \u0434\u043e\u0447\u0435\u0440\u0438 \u0431\u044b\u0432\u0448\u0435\u0433\u043e \u0440\u0443\u043a\u043e\u0432\u043e\u0434\u0438\u0442\u0435\u043b\u044f \u0413\u0410\u0418 \u0423\u043a\u0440\u0430\u0438\u043d\u044b \u0410\u043b\u0435\u043a\u0441\u0430\u043d\u0434\u0440\u0430 \u0415\u0440\u0448\u043e\u0432\u0430. \u041d\u0430 \u0444\u043e\u0442\u043e \u0434\u043e\u0447\u044c \u0415\u0440\u0448\u043e\u0432\u0430 \u0432 \u041a\u0430\u043d\u043d\u0430\u0445 \u0440\u044f\u0434\u043e\u043c \u0441 \u041f\u044d\u0440\u0438\u0441 \u0425\u0438\u043b\u0442\u043e\u043d. \u0412 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u0435 \u0441\u043a\u0430\u043d\u0434\u0430\u043b\u0430 \u0438\u0437-\u0437\u0430 \u043d\u0435\u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0438\u044f \u0437\u0430\u0434\u0435\u043a\u043b\u0430\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0445 \u0434\u043e\u0445\u043e\u0434\u043e\u0432 \u0438 \u043e\u0431\u0440\u0430\u0437\u0430 \u0436\u0438\u0437\u043d\u0438 \u0441\u0435\u043c\u044c\u0438 <a href=\"http:\/\/www.radiosvoboda.org\/content\/article\/27025593.html\">\u0415\u0440\u0448\u043e\u0432 \u043f\u043e\u0434\u0430\u043b \u0432 \u043e\u0442\u0441\u0442\u0430\u0432\u043a\u0443<\/a>.<\/i>  <\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[],"tags":[],"class_list":["post-269089","post","type-post","status-publish","format-standard","hentry"],"_links":{"self":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/269089","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=269089"}],"version-history":[{"count":0,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=\/wp\/v2\/posts\/269089\/revisions"}],"wp:attachment":[{"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=269089"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=269089"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/savepearlharbor.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=269089"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}