简单的挑战是由我以前的打印无形文本和实际的无形文本挑战，以及相同长度的不同字符串挑战的流行所启发。

给定一个仅包含可打印字符（0x20 to 0x7E）的字符串，请打印该字符串中不存在的每个可打印字符。

输入值

字符串或字符数组，仅由可打印的ASCII字符组成

输出量

输入字符串中没有出现的每个可打印ASCII字符（不按任何顺序）。

测试用例

Input:  "Hello, World!"
Output: ""#$%&'()*+-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRSTUVXYZ[\]^_`abcfghijkmnpqstuvwxyz{|}~"
========
Input:  "Hi!"
Output: " "#$%&'()*+,-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghjklmnopqrstuvwxyz{|}~"
========
Input:  ""
Output: " !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~"
========
Input:  " !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~"
Output: ""

计分

这是代码高尔夫球，因此每种语言中的最少字节数获胜

GS2，2个字节

ç7

在线尝试！

怎么运行的

    (implicit) Push the sting of all characters in STDIN on the stack.
ç   Push the string of all printable ASCII characters.
 7  Perform symmetric set difference.
    (implicit) Print the result to STDOUT.

Perl 6、29个字节

{[~] keys (' '..'~')∖.comb}

请注意，结果是随机的，因为Set是无序的。

测试一下

展开：

{
  [~]        # reduce using string concatenation
             # (shorter than ｢join '',｣)

  keys       # get the keys from the Set object resulting from the following

  (' '..'~') # Range of printable characters
  ∖          # Set minus (this is not \ )
  .comb      # split the input into individual characters
}

还有的ASCII版本∖ (-)，但是它之前需要有一个空格，这样它就不会被解析为子例程调用。

Python 3.5，39个字节

lambda n:{*map(chr,range(32,127))}-{*n}

在线尝试！
将输入变成集合，并将其从包含所有ascii字符的集合中删除

Japt，14个字节

Ho#_dÃf@bX ¥J

在线尝试！

感谢Shaggy和obarakon，节省了4个字节

Haskell，32个字节

f x=[y|y<-[' '..'~'],all(/=y)x] 

在线尝试！

设置差异的无聊库函数：

Haskell，31个字节

import Data.List
([' '..'~']\\)

MATL，5个字节

6Y2X~

在线尝试！

感谢路易斯·门多（Luis Mendo）打高尔夫球8个字节！

说明：

   X~   % The symmetric set difference
6Y2     % Between all printable ASCII
        % And the input string (implicit)
        % Implicitly display

对称集差异将给出恰好存在于两个输入集之一中的每个元素。（但不是全部）这将始终给出正确的答案，因为输入集将始终是第二个集的子集（所有可打印ASCII）。

原始版本：

32:126tGom~)c

说明：

32:126          % Push the range 32-126
      t         % Duplicate it on the stack
       G        % Push the input
        o       % Convert it to character points
         m      % Is member (0 for each char that isn't in input, 1 for each char that is)
          ~     % Logical NOT
           )    % Take the truthy elements of this array from the previous array (All Printable ASCII)
            c   % Display as a string

Brachylog，5个字节

ẹ;Ṭ↔x

在线尝试！

说明

ẹ          Split the input string into a list of chars
 ;Ṭ↔x      Exterminate the chars from the string Ṭ of printable ASCII chars

JavaScript（ES6），74个字节

我敢肯定有更短的方法可以做到这一点！

s=>[...Array(95)].map((_,y)=>s.includes(c=String.fromCharCode(y+32))?"":c)

尝试一下

let f=
s=>[...Array(95)].map((_,y)=>s.includes(c=String.fromCharCode(y+32))?"":c)
oninput=_=>o.innerText=f(i.value).join``
o.innerText=f(i.value="Hello, World!").join``

<input id=i><pre id=o>

击，47 43 40字节

printf %x {32..126}|xxd -r -p|tr -d "$1"

在线尝试！

生成十六进制范围，将十六进制转储转换为char并删除第一个参数中存在的字符。

八度，22 20字节

感谢@Luis Mendo节省了2个字节。

@(s)setxor(32:'~',s)

在线尝试！

其他答案：

@(s)setdiff(' ':'~',s)

在线尝试！

PHP，42字节

输入为数组

输出为字符串

<?=join(array_diff(range(" ","~"),$_GET));

在线尝试！

PHP，53字节

输入为字符串

输出为字符串

<?=join(array_diff(range(" ","~"),str_split($argn)));

替换<?=join与print_r用于输出作为阵列

在线尝试！

CJam，8个字节

'␡,32>q^

␡文字删除字符在哪里。

在线尝试！

'␡,       e# The range of all characters up to ~.
   32>    e# Slice it to be the range of all characters from space to ~.
      q^  e# Symmetric set difference with the input.

Perl，39个字节

s!.*!"pack(c95,32..126)=~y/$_//dr"!ee

用运行perl -pe。

brainfuck，120个字节

+[+[>+<+<]>]>-[[>>]+[<<]>>-],[<+++++[>------<-]>-[>[>>]+[<<]>-]>[>>]<[-]<[-<<]>,]++++++++[->++++<]>[>[-<.>]<[->>+<<]>>+]

在线尝试！

包裹：

+[+[>+<+<]>]>-[[>>]+[<<]>>-],[<+++++[>--
----<-]>-[>[>>]+[<<]>-]>[>>]<[-]<[-<<]>,
]++++++++[->++++<]>[>[-<.>]<[->>+<<]>>+]

解释：

+[+[>+<+<]>]>-         initialize what we will now consider cell 0 to 95
[[>>]+[<<]>>-]         initialize cells 2 4 etc 95*2 to 1; end on cell 0 at 0
,[                     main input loop (for each char of input)
  <+++++[>------<-]>-  subtract 31 from the input
  [>[>>]+[<<]>-]       lay a trail of (input minus 31) ones in the empty spaces
  >[>>]<[-]<[-<<]>     use the trail to clear the appropriate "print" flag
,]                     keep reading input until it ends
++++++++[->++++<]>     initialize the cell directly before flag 1 to 32
[                      we'll let the accumulator overflow; no harm done
  >[-<.>]              print the accumulator if the flag is still set
  <[->>+<<]>>+         shift over the accumulator and increment it
]

欧姆，3个字节

α@─

在线尝试！

注意：您也可以将输入内容作为字符串输入（示例），但是对于空的输入大小写则失败。

Ruby，23 18 17字节

->s{[*' '..?~]-s}

根据@sethrin的注释使用lambda函数。

之前的版本：

[*' '..?~]-s.chars

(' '..'~').to_a-s.chars

APL，13个字节

⍞~⍨⎕UCS31+⍳95

直截了当：

       31+⍳95  ⍝ A vector 32 .. 126
   ⎕UCS        ⍝ as characters
 ~⍨            ⍝ without
⍞              ⍝ those read from character input.

R，50个字节

function(s)intToUtf8(setdiff(32:126,utf8ToInt(s)))

返回一个匿名函数。将输入字符串转换为整数，计算可打印范围和输入值之间的设置差，然后将它们转换回字符串并返回。

在线尝试！

PHP，53字节

for($k=31;$k++<126;)~strstr($argn,$k)?:print chr($k);
# or
for($k=31;$k++<126;)echo~strstr($argn,$k)?"":chr($k);

与一起作为管道运行-r。

C＃，74 71字节

using System.Linq;s=>new int[95].Select((n,i)=>(char)(i+32)).Except(s);

创建范围为74字节的旧版本：

using System.Linq;s=>Enumerable.Range(32,95).Select(n=>(char)n).Except(s);

05AB1E，5 4字节

-1感谢Emigna

žQsK

在线尝试！

žQ   # Push all printable characters
  s  # Swap input to the top
   K # Push a with no b's (remove input characters from all printable character)

V，20字节

òiÎflax
òcH ¬ ~@"<

在线尝试！

十六进制转储：

00000000: f269 ce66 1b6c 6178 0af2 6348 20ac 207e  .i.f.lax..cH . ~
00000010: 1b40 223c                                .@"<

C（gcc），75 72 70 68 50字节

i;f(s){for(i=31;++i<127;strchr(s,i)?:putchar(i));}

在线尝试！

果冻，8 字节

真的是8个字节吗？请告诉我我错过了什么！

32r126Ọḟ

在线尝试！

怎么样？

32r126Ọḟ - Main link: list of characters s
32r126   - inclusive range from 32 to 126 = [32,33,...,125,126]
      Ọ  - cast ordinals to characters = list of printable characters
       ḟ - filter discard if in s

或者

“ ~‘r/Ọḟ - Main link
“ ~‘     - code-page indexes = [32,126]
    r/   - reduce by inclusive range = [32,33,...,125,126]
      Ọ  - cast from ordinals to characters = list of printable characters
       ḟ - filter discard if in s

由于这一挑战ØṖ，引入了一个新原子，该原子可产生所有可打印的ASCII字符，从而使3个字节的工作如下：

ØṖḟ

木炭，18 15 10 8字节

Ｆγ¿¬№θιι

在线尝试！链接是详细版本的代码。编辑：通过覆盖字符而不是整数节省了3个字节。当我发现γ包含可打印ASCII字符的未记录变量时，又节省了5个字节。在纯模式下，仅@ASCII的固定预定义输入时，还保存了另外2个字节（答案仍然是正确的，这只是当时的try it在线链接不起作用）。

Mathematica，35个字节

20~CharacterRange~126~Complement~#&

匿名函数。将字符列表作为输入，并返回字符列表作为输出。

Lua，78个字节

s=io.read()for i=32,126 do c=string.char(i)io.write(s:find(c,1,1)and""or c)end

shortC，33个字节

i;AOi=31;++i<'~';strchr(*@,i)?:Pi

在此程序中进行的转换：

• A -> int main(int argc, char **argv) {
• O -> for(
• @ -> argv
• P -> putchar
• 自动插入关闭 ));}

结果程序如下：

i;int main(int argc, char **argv){for(i=31;++i<'~';strchr(*argv,i)?:putchar(i));}

在线尝试！

Pyth，17个字节

Vr32 127I!}CNzpCN

天真的方法。

说明：

Vr32 127I!}CNzpCN
Vr32 127             For N in [32, 127[
           CN        Get the ASCII character for the code N
        I!}  z       If it is in the input string...
              pCN    ...then print it

在线测试！

Clojure，60或49个字节

#(apply str(sort(apply disj(set(map char(range 32 127)))%)))

这些“应用”正在杀死我：/哦，如果返回列表很好，那么它会短一些。

#(sort(apply disj(set(map char(range 32 127)))%))