R devel - Nov 2017 - formatting raw vectors with names

I think there?s a bug concerning the formatting of raw vectors with names:
> structure(as.raw(1:3), .Names = c("a", "bbbb",
"c"))
   a bbbb    c 
01 02 03 
> structure(1:3, .Names = c("a", "bbbb", "c"))
   a bbbb    c 
   1    2    3 

The problem is that EncodeRaw does not honor the requested width, in fact it
doesn?t even get the width as a parameter.
An easy fix would be to change:

static void printNamedRawVector(Rbyte * x, int n, SEXP * names)
    PRINT_N_VECTOR(formatRaw(x, n, &w),
		   Rprintf("%s%*s", EncodeRaw(x[k], ""),
R_print.gap,""))

to

static void printNamedRawVector(Rbyte * x, int n, SEXP * names)
    PRINT_N_VECTOR(formatRaw(x, n, &w),
		   Rprintf("%*s%s%*s", w - 2, "", EncodeRaw(x[k],
""), R_print.gap,""))

in printvector.c:314.

- Lukas

>>>>> Lukas Stadler <lukas.stadler at oracle.com>
>>>>>     on Thu, 9 Nov 2017 16:34:49 +0100 writes:
    > I think there?s a bug concerning the formatting of raw vectors with
names:
    >> structure(as.raw(1:3), .Names = c("a", "bbbb",
"c"))
    > a bbbb    c 
    > 01 02 03 
    >> structure(1:3, .Names = c("a", "bbbb",
"c"))
    > a bbbb    c 
    > 1    2    3 

    > The problem is that EncodeRaw does not honor the requested width, in
fact it doesn?t even get the width as a parameter.
    > An easy fix would be to change:

    > static void printNamedRawVector(Rbyte * x, int n, SEXP * names)
    >    PRINT_N_VECTOR(formatRaw(x, n, &w),
    >                   Rprintf("%s%*s", EncodeRaw(x[k],
""), R_print.gap,""))

    > to

    > static void printNamedRawVector(Rbyte * x, int n, SEXP * names)
    >    PRINT_N_VECTOR(formatRaw(x, n, &w),
    >                   Rprintf("%*s%s%*s", w - 2, "",
EncodeRaw(x[k], ""), R_print.gap,""))

    > in printvector.c:314.

Thank you, Lukas,

all you show and say seems very convincing to me,
notably the fix as well.

I'll deal with this, after a little testing.
If the effect is small in "package - space", it may be ported to
R-patched to become R 3.4.3  in three weeks.

Martin