내용

글번호 783
작성자 허진경
작성일 2017-11-07 16:10:18
제목 R에서 CIFAR 이미지 확인하기 코드
내용 oldPar = par(mfrow=c(5,5), mar=c(1,1,1,1)) to.read = file("/tmp/cifar10_data/cifar-10-batches-bin/data_batch_2.bin", "rb") for(i in 1:25){ print(readBin(to.read, integer(), n=1, size=1)) r = matrix(readBin(to.read, integer(), n=32*32, size=1, signed=F), 32, 32); g = matrix(readBin(to.read, integer(), n=32*32, size=1, signed=F), 32, 32); b = matrix(readBin(to.read, integer(), n=32*32, size=1, signed=F), 32, 32); image(r[,32:1]) } par(oldPar)