<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	>

<channel>
	<title>SAS BLOG</title>
	<atom:link href="http://www.barnat.net/sas/feed/" rel="self" type="application/rss+xml" />
	<link>http://www.barnat.net/sas</link>
	<description>notatki</description>
	<pubDate>Sat, 05 Jun 2010 19:11:27 +0000</pubDate>
	<generator>http://wordpress.org/?v=2.6.2</generator>
	<language>en</language>
			<item>
		<title>JavaScript - This</title>
		<link>http://www.barnat.net/sas/javascript-this/</link>
		<comments>http://www.barnat.net/sas/javascript-this/#comments</comments>
		<pubDate>Sat, 05 Jun 2010 19:11:27 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[Uncategorized]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=180</guid>
		<description><![CDATA[One of the most powerful JavaScript keywords is this.
http://www.quirksmode.org/js/this.html
element.onclick = doSomething;
The function is copied in its entirety to the onclick property (which now becomes a method). So if the event handler is executed this refers to the HTML element.
However, if you use inline event registration
&#60;element onclick=&#8221;doSomething()&#8221;&#62;
you do not copy the function! Instead, you refer to [...]]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/javascript-this/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Kalendarz w MySql</title>
		<link>http://www.barnat.net/sas/kalendarz-w-mysql/</link>
		<comments>http://www.barnat.net/sas/kalendarz-w-mysql/#comments</comments>
		<pubDate>Wed, 03 Mar 2010 23:18:15 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[Uncategorized]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=178</guid>
		<description><![CDATA[create table firstday (data date);
insert into firstday values (&#8217;2010-02-20&#8242;);
DROP TABLE jednosci;
CREATE TABLE jednosci (jednosci int);
INSERT INTO jednosci    VALUES (1);
INSERT INTO jednosci    VALUES (2);
INSERT INTO jednosci    VALUES (3);
INSERT INTO jednosci    VALUES (4);
INSERT INTO jednosci    VALUES (5);
INSERT INTO jednosci    [...]]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/kalendarz-w-mysql/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Miary pozycyjne, sas, teradata</title>
		<link>http://www.barnat.net/sas/miary-pozycyjne-sas-teradata/</link>
		<comments>http://www.barnat.net/sas/miary-pozycyjne-sas-teradata/#comments</comments>
		<pubDate>Sat, 21 Nov 2009 17:23:45 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[SAS]]></category>

		<category><![CDATA[Teradata]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=175</guid>
		<description><![CDATA[Dla sasa gotowy do odpalenia kod:
* SAS
data baza;
input x best12.;
cards;
2
3
1
4
5
6
7
8
9
10
;run;
proc sort data = baza; by x; run;
data baza_pozycja;
set baza NOBS=count;
kwantyl = round(_n_/(count/4) + 0.4999, 1);
decyl =   round(_n_/(count/10)+ 0.4999,1);
run;
Dla teradaty, wymagana teabelka o nazwie baza, zaierająca kolumny  id int, x int.
* TERADATA
alter table baza add kwantyl_ncr byteint;
alter table baza add decyl_ncr byteint;
update baza from
(sel
a.id
quantile(4,x) [...]]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/miary-pozycyjne-sas-teradata/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Make wykres transparent ;&gt;</title>
		<link>http://www.barnat.net/sas/make-wykres-transparent/</link>
		<comments>http://www.barnat.net/sas/make-wykres-transparent/#comments</comments>
		<pubDate>Fri, 10 Jul 2009 14:59:10 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[VBA]]></category>

		<category><![CDATA[excel]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=168</guid>
		<description><![CDATA[Sub make_chart_transparent()
    With ActiveChart
        .ChartArea.Border.LineStyle = xlNone
        .ChartArea.Interior.ColorIndex = xlNone
        .PlotArea.Border.LineStyle = xlNone
        .PlotArea.Interior.ColorIndex = xlNone
        .Legend.Delete
     End With
    
     With ActiveChart.Axes(xlCategory)
        .MajorTickMark = xlNone
        .MajorTickMark = xlNone
        .TickLabelPosition = xlNone
     End With
   
    With ActiveChart.Axes(xlValue)
        .MajorTickMark = xlNone
        .MajorTickMark = xlNone
        .TickLabelPosition = xlNone
     End With
    
     For Each ax In ActiveChart.Axes
        ax.HasMajorGridlines = False
        ax.Border.ColorIndex = [...]]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/make-wykres-transparent/feed/</wfw:commentRss>
		</item>
		<item>
		<title>VBA - Grupowanie kolorem</title>
		<link>http://www.barnat.net/sas/vba-grupowanie-kolorem/</link>
		<comments>http://www.barnat.net/sas/vba-grupowanie-kolorem/#comments</comments>
		<pubDate>Wed, 08 Jul 2009 08:42:44 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[VBA]]></category>

		<category><![CDATA[excel]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=163</guid>
		<description><![CDATA[Sub grupuj_kolorem()
Dim row As Range
Dim target As Range
Dim x As Integer
Dim licznik As Integer
col_number = Val(InputBox(&#8221;Podaj numer kolumny do grupowania&#8221;))
Selection.CurrentRegion.Select
Selection.Offset(1, 0).Resize(Selection.Rows.Count - 1).Select
For Each row In Selection.Rows
    Set target = row.Range(Cells(1, col_number), Cells(1, col_number))
    If target.Value &#60;&#62; target.Offset(-1, 0).Value Then
        x = Abs(x - 1)
        licznik = licznik + 1
    End If
    If x = [...]]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/vba-grupowanie-kolorem/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Excel - oznacz myszką wybrany wiersz</title>
		<link>http://www.barnat.net/sas/excel-oznacz-myszka-wybrany-wiersz/</link>
		<comments>http://www.barnat.net/sas/excel-oznacz-myszka-wybrany-wiersz/#comments</comments>
		<pubDate>Thu, 04 Jun 2009 09:35:29 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[VBA]]></category>

		<category><![CDATA[excel]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/excel-oznacz-myszka-wybrany-wiersz/</guid>
		<description><![CDATA[Private Declare Function GetKeyState Lib &#8220;user32&#8243; (ByVal nVirtKey As Long) As Integer
Private Const kCapital = 20
Private Const kNumlock = 144
Private Const TargetCol = 3
Public Function CapsLock() As Boolean
CapsLock = KeyState(kCapital)
End Function
Private Function KeyState(lKey As Long) As Boolean
KeyState = CBool(GetKeyState(lKey))
End Function
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If CapsLock Then
    For Each cell In [...]]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/excel-oznacz-myszka-wybrany-wiersz/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Uzupełnienie braków w ciągłości, kumulacja</title>
		<link>http://www.barnat.net/sas/uzupelnienie-brakow-w-ciaglasci-kumulacja/</link>
		<comments>http://www.barnat.net/sas/uzupelnienie-brakow-w-ciaglasci-kumulacja/#comments</comments>
		<pubDate>Thu, 28 May 2009 14:26:04 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[Uncategorized]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=158</guid>
		<description><![CDATA[data baza;
input dzien kumulacja;
cards;
1 1
2 3
8 4
10 8
15 9
22 15
27 18
30 20
;run;
data temp;
 set baza;
 output;
 ile_brakuje = max(((lag(dzien)-dzien)+1)*-1,0);
  do x = 1 to ile_brakuje;
   nowy_dzien = dzien - x;
  drop ile_brakuje x;
   output;
  end;
run;
data nowa_baza;
set temp;
dzien = coalesce(nowy_dzien,dzien);
keep  kumulacja dzien;
run;
proc sort data= nowa_baza;
by dzien;
run;
]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/uzupelnienie-brakow-w-ciaglasci-kumulacja/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Top N wartości dla każdej grupy w pojedyńczym zapytaniu</title>
		<link>http://www.barnat.net/sas/top-n-wartosci-dla-kazdej-grupy-w-pojedynczym-zapytaniu/</link>
		<comments>http://www.barnat.net/sas/top-n-wartosci-dla-kazdej-grupy-w-pojedynczym-zapytaniu/#comments</comments>
		<pubDate>Thu, 21 May 2009 09:00:24 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[Uncategorized]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=156</guid>
		<description><![CDATA[w pojedyńczym zapytaniu, wow
http://rickosborne.org/blog/index.php/2008/01/07/sql-getting-top-n-rows-for-a-grouped-query/
SELECT c.*, d.ranknum
FROM girl AS c
  INNER JOIN (
    SELECT a.id, COUNT(*) AS ranknum
    FROM girl AS a
      INNER JOIN girl AS b ON (a.hair = b.hair) AND (a.score &#60;= b.score)
    GROUP BY a.id
    HAVING COUNT(*) &#60;= 3
  ) AS d ON (c.id = d.id)
ORDER BY c.hair, d.ranknum
]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/top-n-wartosci-dla-kazdej-grupy-w-pojedynczym-zapytaniu/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Nowości w Datamining</title>
		<link>http://www.barnat.net/sas/nowosci-w-datamining/</link>
		<comments>http://www.barnat.net/sas/nowosci-w-datamining/#comments</comments>
		<pubDate>Mon, 09 Mar 2009 20:57:32 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[Data Mining]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=146</guid>
		<description><![CDATA[Nowe oprogramowanie Wolframa wyławia nieustrukturyzowane dane z Sieci, strukturyzuje je, uruchamia na nich swoje algorytmy i w efekcie generuje „fakty” i „odpowiedzi” w odpowiedzi na zapytania zadawane poprzez przypominający Google formularz wyszukiwania.
http://www.techcrunch.com/2009/03/08/wolfram-alpha-computes-answers-to-factual-questions-this-is-going-to-be-big/
]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/nowosci-w-datamining/feed/</wfw:commentRss>
		</item>
		<item>
		<title>Przegląd muzyczny, dla odmiany</title>
		<link>http://www.barnat.net/sas/przeglad-muzyczny-dla-odmiany/</link>
		<comments>http://www.barnat.net/sas/przeglad-muzyczny-dla-odmiany/#comments</comments>
		<pubDate>Sat, 28 Feb 2009 22:11:34 +0000</pubDate>
		<dc:creator>jbarnat</dc:creator>
		
		<category><![CDATA[Muzycznie]]></category>

		<guid isPermaLink="false">http://www.barnat.net/sas/?p=130</guid>
		<description><![CDATA[Leon Jackson - Creative


Michael Buble - Sway

Tom Jones - If He Should Ever Leave You

Andy Williams - Can&#8217;t Take My Eyes Off You (Oct. 1967)

Frank Sinatra - Fly Me To The Moon

]]></description>
		<wfw:commentRss>http://www.barnat.net/sas/przeglad-muzyczny-dla-odmiany/feed/</wfw:commentRss>
		</item>
	</channel>
</rss>
