vdc(n, base):= makelist(
  digits2dec(
    dec2digits(k, base),
    1/base) / base,
  k, n);

vdc(10, 2);
/*
                        1  1  3  1  5  3  7  1   9   5
(%o123)                [-, -, -, -, -, -, -, --, --, --]
                        2  4  4  8  8  8  8  16  16  16
*/

vdc(10, 5);
/*
                      1  2  3  4  1   6   11  16  21  2
(%o124)              [-, -, -, -, --, --, --, --, --, --]
                      5  5  5  5  25  25  25  25  25  25
*/