Displaying 1 result from an estimated 1 matches for "catsafer".
2023 Jul 31
1
random network disconnects
...et has a solution.
At work we are getting lots of issues with 'permission denied' or
'network not found' and so forth when reading and writing between our
machines and a file server. This happens randomly so the following
function solves the problem for 'cat' commands:
catSafer <-
function (..., ReTries = 20, ThrowError = TRUE)
{
for (catsi in seq_len(ReTries)) {
res <- try(cat(...))
if (!inherits(res, "try-error"))
break
}
if (inherits(res, "try-error")) {
if (ThrowError) {
stop...