texlab/r

Running R code from PHP

Maintainers

Details

github.com/andy-aa/phpR

Source

Issues

Installs: 10

Dependents: 0

Suggesters: 0

Security: 0

Stars: 0

Watchers: 0

Forks: 0

Open Issues: 0

v0.03 2020-10-21 22:42 UTC

Requires

  • php: >=7.4

Requires (Dev)

MIT 5b6a2bbe973470b1822fa0237494b2056e935d25

This package is auto-updated.

Last update: 2024-04-29 04:27:35 UTC

README

Build Status License: MIT Unstable Version PHPStan Psalm Actions Status: CI

install

composer require texlab/r

usage example

PHP code

<?php

header("Content-Type: text/plain");

use TexLab\R\Runner;

require "../vendor/autoload.php";

$r = new Runner();

$code = <<<R
x=1:10
y=5+1*x+rnorm(10)
summary(lm(y~x));
R;

echo $r->run($code);

output

Call:
lm(formula = y ~ x)

Residuals:
    Min      1Q  Median      3Q     Max
-1.1988 -0.9164 -0.1257  0.7085  1.7562

Coefficients:
            Estimate Std. Error t value Pr(>|t|)
(Intercept)   4.5280     0.7291   6.211 0.000256 ***
x             1.0529     0.1175   8.961 1.91e-05 ***
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Residual standard error: 1.067 on 8 degrees of freedom
Multiple R-squared:  0.9094,    Adjusted R-squared:  0.8981
F-statistic: 80.29 on 1 and 8 DF,  p-value: 1.914e-05

PHP code

<?php

use TexLab\R\Script;
use TexLab\R\Runner;

require "../vendor/autoload.php";

$r = new Script(new Runner());


$code = <<<R
library(base64enc)

temp_file_name <- tempfile()

png(file = temp_file_name, width = 300, height = 300, units = "px");

hist(x=rnorm(1000), col='blue');

dev.off();

php_plot_data <- paste("data:image/png;base64,", base64enc::base64encode(temp_file_name))

file.remove(temp_file_name)
R;

$data = $r->run($code)

?>
<!DOCTYPE html>
<html lang="en">
<head>
    <meta charset="UTF-8">
    <title>Title</title>
</head>
<body>
<img src="<?= $data['php_plot_data'] ?>">
</body>
</html>

output

image