본문 바로가기

전체 글213

windows 10 / Defender off / 디펜더 끄기 windows 10 디펜더 끄기 실행 > regedit 컴퓨터 - HKEY_LOCAL_MACHINE - SOFTWARE - Policies - Microsoft - Windows Defender "새로만들기" > "DWORD(32비트) 값" > DisableAntiSpyware > 값 : "16진수" "1" 2020. 4. 16.
Centos 7 / network config CLI Centos 7 / network config CLI [root@Server]# nmtui [root@Server]# [root@Server]# service network restart [root@Server]# 2020. 4. 16.
java / encodingTest public class encodingTest { public static void main(String[] args) { System.out.println("file.encoding=" + System.getProperty("file.encoding")); } } 2020. 4. 16.
excel / VBA / macro / 선택값으로 sheet 추가 Sub 추가_Click() 'Sheet2를 Sheet1 앞에다 복사하기 'Worksheets("form").Copy After:=Worksheets("form") Dim rngCnt As Integer Dim rngColCnt As Integer Dim sRow As Integer Dim eRow As Integer Dim sCol As Integer Dim rngEnd As Range Dim rng As Range: Set rng = Selection '// 선택된 영역 rngCnt = Selection.Rows.Count '// 선택된 영역의 총 Row 수 rngColCnt = Selection.Columns.Count '// 선택된 영역의 총 Row 수 sRow = Selection.Row '// .. 2020. 4. 16.
R / agricolae / cv 찾기 #install.packages("agricolae") library(agricolae) tr=rep(c("A","S","U"), each=3) rp=rep(c(1:3),3) d=c(3.3,2.9,3.1, 3.1,2.7,3.3, 25.0,20.1,23.0) eff=data.frame(tr,rp,d) eff$tr=as.factor(eff$tr) eff$rp=as.factor(eff$rp) fix(eff) eff.aov=aov(d~tr+rp, data=eff) summary(eff.aov) dmrt=duncan.test(eff.aov, "tr") #print(dmrt) print(dmrt[["statistics"]]["CV"]) --------------------------------------------.. 2020. 4. 16.
aliexpress airpod 2 case 2020. 4. 16.
HP 14-dk0022wm Notebook 14" HD Ryzen 3 3200U 2.6Hz 4GB RAM 2020. 4. 16.
excel / vba / 시트명으로 이동 A2 값이 "공통" 인경우 "공통" sheet의 A1 cell로 이동하기 =HYPERLINK("#"&A2&"!a1","'"&A2&"' (으)로 이동하기") 2020. 4. 16.
excel / vba / sheet 목록 가져오기 Sub 목록추출() '함수명 Dim SheetNames() SheetCount = ActiveWorkbook.Sheets.Count ReDim SheetNames(1 To SheetCount) 'Sheets("목록").Select ' "목록" 이라는 sheet에 sheet목록 만들기 Range("A2").Select 'A2 cell부터 시트명입력 For i = 1 To SheetCount SheetNames(i) = ActiveWorkbook.Sheets(i).Name ActiveCell = ActiveWorkbook.Sheets(i).Name ActiveCell.Offset(1, 0).Select Next i End Sub 2020. 4. 16.
반응형