<?php
$str = <<<'STR'
<pre><code>a <- data.frame(element1 = c("JB", "AC", "DO", "MR"),
element2 = c(1, 3, 4, 2))
b <- data.frame(JB = c("a", "b", "s"), DO = c("ER", "TR", "OP"))
merge(b,a)
</code></pre>
<p>This should do the job.
Output will be:</p>
<pre><code> JB DO element1 element2
1 a ER JB 1
2 b TR JB 1
3 s OP JB 1
4 a ER AC 3
5 b TR AC 3
6 s OP AC 3
7 a ER DO 4
8 b TR DO 4
9 s OP DO 4
10 a ER MR 2
11 b TR MR 2
12 s OP MR 2
</code></pre>
STR;
echo strip_tags($str);
Warning: PHP Startup: Unable to load dynamic library 'sodium.so' (tried: /usr/lib/php/8.3.5/modules/sodium.so (libsodium.so.23: cannot open shared object file: No such file or directory), /usr/lib/php/8.3.5/modules/sodium.so.so (/usr/lib/php/8.3.5/modules/sodium.so.so: cannot open shared object file: No such file or directory)) in Unknown on line 0
a