Сгруппируйте числа с одинаковой суммой

12

Ваша задача, учитывая квадратную сетку цифр ( 0-9), вывести один из способов, которыми цифры могут быть сгруппированы так, чтобы:

  1. Каждая цифра является частью ровно одной группы
  2. Все группы имеют одинаковое количество цифр
  3. Все группы ограничены одной многоугольной формой (это означает, что каждая цифра в группе находится рядом с [влево, вправо, вверх, вниз] по крайней мере еще одной цифрой в той же группе, если в каждой группе нет 1 элемента).
  4. Все группы имеют одинаковую сумму

Сетка ввода всегда будет квадратом: вы можете выбрать любой метод ввода, который вам нравится (включая предоставление аргументов функции или методу). Кроме того, на входе будет указано количество групп, в которые ваша программа должна сгруппировать цифры.

Пример ввода:

Предположим, ваш формат ввода stringOfDigits numberOfGroups.

Пример ввода будет:

156790809 3

который будет переводить в (сетка sqrt(9) * sqrt(9))

1 5 6
7 9 0
8 0 9

которую вам придется разделить на 3 группы, каждая из которых должна иметь 9 / 3 = 3элементы с одинаковой суммой.

Вывод: Вывод должен быть строкой цифр с необязательными пробелами и символами новой строки для форматирования, за каждой цифрой следует буква, a-zобозначающая ее группу. Там должно быть точно numberOfTotalDigits / numberOfGroupsэлементы в каждой группе. Вам никогда не придется делить что-то на более чем 26 групп.

Пример вывода:

1a 5a 6b
7c 9a 0b
8c 0c 9b

Обратите внимание, что замена всех as на bs и bs на as одинаково действительна. Пока каждая группа обозначена отдельной буквой, выходные данные действительны.

Кроме того, я ожидаю, что большинство программ будет выводить что-то вроде этого, потому что новые строки / пробелы являются необязательными:

1a5a6b7c9a0b8c0c9b

В этом случае добавляются все цифры группы a, bили cсоставляет 15. Кроме того, все группы связаны каким-либо полигоном.

Неверные выходы:

1a 5a 6b
7c 9a 0c
8c 0b 9b

потому что группы не образуют многоугольники (в частности, они 6bизолированы и 0cтакже одиноки).

1a 5a 6b
7c 9a 0b
8c 0b 9b

потому что группа bимеет 4 элемента, в то время как cтолько 2.

И т.п.

Если нет действительного решения, ваша программа может сделать что-нибудь (то есть остановить, завершить сбоем, запустить навсегда), но если ваша программа печатает, Noneкогда нет действительного решения, -15на ваш счет.

Если существует более одного решения, вам нужно распечатать только одно, но -20если ваша программа печатает их все, разделенные каким-либо разделителем.

Это код гольф, поэтому самый короткий код (с бонусами) выигрывает!

soktinpk
источник
В первом неверном выводе, я думаю, вы имеете в виду, что 6bон изолирован, а не 0b.
Уровень Река St
Имеет ли значение, насколько быстро работает наша программа? А что, если он слишком медленный, чтобы проверить, работает ли он?
Beta Decay
156790889 3кажется, что так и должно быть156790809 3
Исаак

Ответы:

10

Пиф , 122 - 20 - 15 = 87

=Z/lzQ=ks^lz.5Jm]dUzL[-bk+bk?tb%bkb?hb%hbkb)FNJIgNZB~Jm+NksmybN;|jbS{msm+@zk@S*Z<GQxsdkUzfqSsTUz^fqsmv@*ZzbY/smvdzQJQ"None

Изменения:

  • 130 -> 120: переключен на разделенный вводом символ новой строки.

  • 120 -> 134: исправлена ​​ошибка, связанная с группами, размер которых не равен длине стороны матрицы.

  • 134 -> 120: печать всех решений, в том числе эквивалентных при групповом переименовании.

  • 120 -> 122: исправлена ​​ошибка, из-за которой генерировались только пути, а не все легальные группы.

Тестовый забег:

pyth programs/sum_group.pyth <<< '156790809
3'
1a5a6b7c9a0b8c0c9b
1a5a6c7b9a0c8b0b9c
1b5b6a7c9b0a8c0c9a
1b5b6c7a9b0c8a0a9c
1c5c6a7b9c0a8b0b9a
1c5c6b7a9c0b8a0a9b


pyth programs/sum_group.pyth <<< '156790808
3'
None

pyth programs/sum_group.pyth <<< '1111     
2'
1a1a1b1b
1a1b1a1b
1b1a1b1a
1b1b1a1a

Объяснение:

Pyth code           (Pseudo)-Python code              Comments

(implicit)          z = input()                       z is the digit string
(implicit)          Q = eval(input())                 S is the number of groups
(implicit)          G = 'abcdefghijklmnopqrstuvwxyz'
=Z/lzQ              Z = len(z)/Q                      Z is the size of each group.
=ks^lz.5            k = int(len(z) ** .5)             k is the side length of the matrix.
Jm]dUz              J = map(lambda d:[d], range(len(z))) Locations are encoded as numbers.
L                   def y(b): return                  y will be the transition function.
 [-bQ                         [b-k,                   Move up - the row above is k less.
  +bQ                          b+k,                   Move down - the row below is k more.
  ?tb%bkb                      b-1 if b%k else b      Move left, unless at the left edge.
  ?hb%hbkb)                    b+1 if (b+1)%k else b] Move right, unless at right edge.
FNJ                 for N in J:                       This constructs the list of all
   IgNZB                       if N[Z-1]: break       Z-length connected groups.
   ~Jm+Nk                      J+=map(lambda k: N+[k],  Append to J the group of N +
      smybN                          sum(map(lambda b:  anything reachable from
                                     y(b),N)))        anywhere in N.
   ;                (end for)
|                   or                                Print first truthy thing between
 S{                 sorted(set(                       Unique elements in sorted order of
   ms               map(lambda b:sum(                 Map+sum over allowable combinations
     m+@zd          map(lambda d:z[d]+                Character in original digit string
       @S*Z<GQ      sorted(G[:Q]*Z)[                  Repeated and sorted early alphabet
        xsbd        sum(b).index(d)],                 At index of number in sum of groups
      Uz                range(len(z)))                Over possible indexes.
   f                filter(lambda T:                  To generate allowable combinations, 
                                                      we will filter all groups of Q paths.
    qSsTUz          sorted(sum(T)) == range(len(z))   Ensure all locations are visited.
    ^                                                 Combinations of
     f              filter(lambda Y:                  Filter over connected Z-length groups
      qsm           equal(sum(map(lambda k:           Sum of the values of the group
         v@*ZzkY    eval((z*Z)[k]),Y)                 In the original digit string
       /smvbzQ      sum(map(lambda b:eval(b),z))/Q    must equal the sum of all values in z
                                                      divided by the number of groups.
      J             J                                 Filter over connected Z-length groups
     Q              Q                                 Combinations of length Q
 "None              "None"                            If the above was empty, print "None"
isaacg
источник
9
"Pyth"? Вы ошиблись "base64".
Инго Бюрк
4

JavaScript (ES6) 361 (376-15) 372

(Может быть, еще можно играть в гольф еще немного)

Как функция, первый параметр - это строка цифр, а второй - количество групп.
Это наивный рекурсивный поиск с остановкой при первом найденном решении (без бонуса -20).
Нужно еще несколько тестов для проверки производительности при большем вводе.

F=(g,n,l=g.length,i=w=Math.sqrt(l),o=s=h='',
  R=(g,p,k,j=l/n,t=s/n,v=0,h=String.fromCharCode(97+k))=>(
    t-=g[p],!(t<0)&&(
      g=[...g],g[p]=h,
      S=f=>g.some((c,p)=>c<':'&&f(p)),
      --j?S(p=>(g[p+1]==h|g[p-1]==h|g[p+w+1]==h|g[p-w-1]==h)?v=R(g,p,k,j,t):0)
      :t?0:k?S(p=>v=R(g,p,k-1)):v=g
    ),v
  )
)=>([for(c of g)(s-=-c,h+=--i?c:(i=w,c+':'))],h=R(g=h,-1,n,1))?h.map((c,p)=>o+=c!=':'?g[p]+c:'')&&o:'None'

Ungolfed & объяснил

F=(g,n)=> 
{
  var l = g.length, // string size, group size is l/n 
      w = Math.sqrt(l), // width of grid
      s,i,h,o;

  // Build a new string in h, adding rows delimiters that will act as boundary markers  
  // At the same time calculate the total sum of all digits
  h='',  // Init string
  s = 0, // Init sum 
  i = w, // Init running counter for delimiters
  [for(c of g)(
    s -= -c, // compute sum using minus to avoid string concatenation
    h += --i ? c : (i=w, c+':') // add current char + delimiter when needed
  )];


  // Recursive search
  // Paramaters:
  // g : current grid array, during search used digits are replaced with group letters
  // p : current position
  // k : current group id (start at n, decreaseing)
  // j : current group size, start at l/n decreasing, at 0 goto next group id
  // t : current group sum value, start at s/n decreasing

  var R=(g,p,k,j,t)=> 
  {
    var v = 0, // init value to return is 0
        h = String.fromCharCode(97+k); // group letter from group

    t-=g[p]; // subtract current digit

    if (t<0) // exceed the sum value, return 0 to stop search and backtrak
      return 0;

    g=[...g]; // build a new array from orginal parameter
    g[p] = h; // mark current position

    // Utility function  to scan grid array
    // call worker function  f only for digit elements
    //   skipping group markers, row delimieters and out of grid values (that are undefined)  
    // Using .some will return ealry if f returns truthy  
    var S=f=>g.some((c,p)=>c<':'&&f(p));

    if (--j) // decrement current group size, if 0 then group completed
    { // if not 0
      // Scan grid to find cells adiacent to current group and call R for each 
      S( p => {
        if (g[p+1]==h|g[p-1]==h|g[p+w+1]==h|g[p-w-1]==h) // check if adiacent to a mark valued h
        {
          return v=R(g,p,k,j,t) // set v value and returns it
        }
      })
      // here v could be 0 or a full grid 
    }
    else
    {
      // special case: at first call, t is be NaN because p -1 (outside the grid)
      // to start a full grid serach
      if (t) // check if current reached 0
        return 0; // if not, return 0 to stop search and backtrak


      if (k) // check if current group completed
      {
        // if not at last group, recursive call to R to check next group 
        S( p => {
          // exec the call for each valid cell still in grid
          // params j and t start again at init values
          return v=R(g,p,k-1,l/n,s/n) // set value v and returns it
        })
        // here v could be 0 or a full grid 
      }
      else
      {
        return g; // all groups checked, search OK, return grid with all groups marked
      }
    }
    return v
  };
  g = h; // set g = h, so g has the row boundaries and all the digits

  h=R(h,-1,n,1); // first call with position -1 to and group size 1 to start a full grid search

  if (h) // h is the grid with group marked if search ok, else h is 0
  {
    o = ''; // init output string
    // build output string merging the group marks in h and the original digits in g
    h.map( (c,p) => o += c>':' ? g[p]+c: '') // cut delimiter ':'
    return o;
  }
  return 'None';
}

Тест в консоли FireFox / FireBug

F("156790809",3) выход 1c5c6b7a9c0b8a0a9b

F("156790819",3) выход None

edc65
источник