9a360692db54e9f1bdacbe29e7dd3743.js

js walczak.org collected 2026-10-04 02:23:03 UTC 9,343 bytes, 2 lines download raw bytes
1document.write('<link rel="stylesheet" href="assets/gist-embed-d7f32d1731d95b9cb4d3c880c428c9e9.css">')
2document.write('<div id=\"gist88963908\" class=\"gist\">\n    <div class=\"gist-file\">\n      <div class=\"gist-data\">\n        <div class=\"js-gist-file-update-container js-task-list-container file-box\">\n  <div id=\"file-removing_triggers_function-r\" class=\"file\">\n    \n\n  <div itemprop=\"text\" class=\"blob-wrapper data type-r \">\n      \n<table class=\"highlight tab-size js-file-line-container\" data-tab-size=\"8\">\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L1\" class=\"blob-num js-line-number\" data-line-number=\"1\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC1\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-c\"><span class=\"pl-c\">#<\/span> define a function<\/span><\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L2\" class=\"blob-num js-line-number\" data-line-number=\"2\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC2\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-en\">replace_nth_ETG4000<\/span> <span class=\"pl-k\">&lt;-<\/span> <span class=\"pl-k\">function<\/span>(<span class=\"pl-smi\">x<\/span>, <span class=\"pl-smi\">mark<\/span>) {<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L3\" class=\"blob-num js-line-number\" data-line-number=\"3\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC3\" class=\"blob-code blob-code-inner js-file-line\">  <span class=\"pl-smi\">x<\/span> <span class=\"pl-k\">&lt;-<\/span> <span class=\"pl-smi\">x<\/span> %<span class=\"pl-k\">&gt;<\/span>% group_by(<span class=\"pl-smi\">Mark<\/span>) %<span class=\"pl-k\">&gt;<\/span>% mutate(<span class=\"pl-v\">Count<\/span> <span class=\"pl-k\">=<\/span> row_number()) %<span class=\"pl-k\">&gt;<\/span>% <span class=\"pl-k\">data.frame<\/span>()<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L4\" class=\"blob-num js-line-number\" data-line-number=\"4\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC4\" class=\"blob-code blob-code-inner js-file-line\">  <span class=\"pl-smi\">double_marks<\/span> <span class=\"pl-k\">&lt;-<\/span> which(<span class=\"pl-smi\">x<\/span><span class=\"pl-k\">$<\/span><span class=\"pl-smi\">Mark<\/span> <span class=\"pl-k\">==<\/span> <span class=\"pl-smi\">mark<\/span> <span class=\"pl-k\">&amp;<\/span> <span class=\"pl-smi\">x<\/span><span class=\"pl-k\">$<\/span><span class=\"pl-smi\">Count<\/span> <span class=\"pl-k\">%%<\/span> <span class=\"pl-c1\">2<\/span> <span class=\"pl-k\">==<\/span> <span class=\"pl-c1\">0<\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L5\" class=\"blob-num js-line-number\" data-line-number=\"5\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC5\" class=\"blob-code blob-code-inner js-file-line\">  <span class=\"pl-smi\">x<\/span><span class=\"pl-k\">$<\/span><span class=\"pl-smi\">Mark<\/span>[<span class=\"pl-smi\">double_marks<\/span>] <span class=\"pl-k\">&lt;-<\/span> <span class=\"pl-c1\">0<\/span><\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L6\" class=\"blob-num js-line-number\" data-line-number=\"6\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC6\" class=\"blob-code blob-code-inner js-file-line\">  <span class=\"pl-smi\">x<\/span> <span class=\"pl-k\">&lt;-<\/span> subset(<span class=\"pl-smi\">x<\/span>, <span class=\"pl-v\">select<\/span> <span class=\"pl-k\">=<\/span> <span class=\"pl-k\">-<\/span><span class=\"pl-smi\">Count<\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L7\" class=\"blob-num js-line-number\" data-line-number=\"7\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC7\" class=\"blob-code blob-code-inner js-file-line\">  <span class=\"pl-k\">return<\/span>(<span class=\"pl-smi\">x<\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L8\" class=\"blob-num js-line-number\" data-line-number=\"8\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC8\" class=\"blob-code blob-code-inner js-file-line\">}<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L9\" class=\"blob-num js-line-number\" data-line-number=\"9\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC9\" class=\"blob-code blob-code-inner js-file-line\">\n<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L10\" class=\"blob-num js-line-number\" data-line-number=\"10\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC10\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-c\"><span class=\"pl-c\">#<\/span> remove second occurrence of Mark 2<\/span><\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L11\" class=\"blob-num js-line-number\" data-line-number=\"11\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC11\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-smi\">df2<\/span> <span class=\"pl-k\">&lt;-<\/span> replace_nth_ETG4000(<span class=\"pl-smi\">df<\/span>, <span class=\"pl-c1\">2<\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L12\" class=\"blob-num js-line-number\" data-line-number=\"12\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC12\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-smi\">df2<\/span> <span class=\"pl-k\">&lt;-<\/span> replace_nth_ETG4000(<span class=\"pl-smi\">df2<\/span>, <span class=\"pl-c1\">2<\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L13\" class=\"blob-num js-line-number\" data-line-number=\"13\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC13\" class=\"blob-code blob-code-inner js-file-line\">\n<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L14\" class=\"blob-num js-line-number\" data-line-number=\"14\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC14\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-c\"><span class=\"pl-c\">#<\/span> reassign block borders<\/span><\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L15\" class=\"blob-num js-line-number\" data-line-number=\"15\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC15\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-smi\">block_borders<\/span> <span class=\"pl-k\">&lt;-<\/span> which(<span class=\"pl-smi\">df2<\/span><span class=\"pl-k\">$<\/span><span class=\"pl-smi\">Mark<\/span> <span class=\"pl-k\">==<\/span> <span class=\"pl-c1\">2<\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L16\" class=\"blob-num js-line-number\" data-line-number=\"16\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC16\" class=\"blob-code blob-code-inner js-file-line\">\n<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L17\" class=\"blob-num js-line-number\" data-line-number=\"17\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC17\" class=\"blob-code blob-code-inner js-file-line\"><span class=\"pl-c\"><span class=\"pl-c\">#<\/span> plot<\/span><\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L18\" class=\"blob-num js-line-number\" data-line-number=\"18\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC18\" class=\"blob-code blob-code-inner js-file-line\">plot(<span class=\"pl-smi\">df2<\/span><span class=\"pl-k\">$<\/span><span class=\"pl-smi\">CH1.703.6<\/span>., <span class=\"pl-v\">type<\/span> <span class=\"pl-k\">=<\/span> <span class=\"pl-s\"><span class=\"pl-pds\">&quot;<\/span>l<span class=\"pl-pds\">&quot;<\/span><\/span>, <span class=\"pl-v\">ylab<\/span> <span class=\"pl-k\">=<\/span> <span class=\"pl-s\"><span class=\"pl-pds\">&quot;<\/span>Intensity<span class=\"pl-pds\">&quot;<\/span><\/span>)<\/td>\n      <\/tr>\n      <tr>\n        <td id=\"file-removing_triggers_function-r-L19\" class=\"blob-num js-line-number\" data-line-number=\"19\"><\/td>\n        <td id=\"file-removing_triggers_function-r-LC19\" class=\"blob-code blob-code-inner js-file-line\">abline(<span class=\"pl-v\">v<\/span> <span class=\"pl-k\">=<\/span> <span class=\"pl-smi\">block_borders<\/span>, <span class=\"pl-v\">col<\/span> <span class=\"pl-k\">=<\/span> <span class=\"pl-s\"><span class=\"pl-pds\">&quot;<\/span>blue<span class=\"pl-pds\">&quot;<\/span><\/span>)<\/td>\n      <\/tr>\n<\/table>\n\n\n  <\/div>\n\n  <\/div>\n<\/div>\n\n      <\/div>\n      <div class=\"gist-meta\">\n        <a href=\"https://gist.github.com/erzk/9a360692db54e9f1bdacbe29e7dd3743/raw/4a91108d2c4cba505cd686cab91ccdad895777ed/removing_triggers_function.R\" style=\"float:right\">view raw<\/a>\n        <a href=\"https://gist.github.com/erzk/9a360692db54e9f1bdacbe29e7dd3743#file-removing_triggers_function-r\">removing_triggers_function.R<\/a>\n        hosted with &#10084; by <a href=\"https://github.com\">GitHub<\/a>\n      <\/div>\n    <\/div>\n<\/div>\n')
Line numbers count LF bytes from the start of the resource, as the search results do. Vendor segments are library code the classifier recognised; they are stored but not indexed. Bytes are shown as Latin1 characters, one per byte.